o 
o 
© 

m 
m 






m 



ii 



UJ 




o 




< 




a. 




V4 




in 




m 




o 




00 




h- 




1 


^ 


OH 




< 


o 


s 




1 ir- 


1- 


o in 


S o. 


CO •• 


LU UJ 


CO 


q: q: 


o 


• e 






OIOO 




ini^ 




O 1 




T- a: 




w< 




<S 




o 1 




w o 




01 




T- 




▼- 




> 




o 




< T- 




S^ 




CL 




• 




• o 




2: < 




t-^ _j 




< Q 




S M 




• o 









O 












O 












"v. 












O 




a. 








» 




3 








UJ 

1 




O 

oc 


z 

o 






V 




O 


»- 




o 


^— 






1- 




s 


-J 




o 


*-4 




1 


Q 


00 


>-l 


I 




o 




r** 


h- 


3S 




(0 


O 


m 


(/) 




Z 1 


▼- 


O 


««— 


O 


l_ 


O 1 


in 


< 




z 


q: 


i^ 1 


GO 


_l 


UJ 


o 


UJ 


1- 1 


1 


o 


z 


< 


00 


< 1 


o 


N 


3 


l-l 


O 


O 1 


< 


o 


-3 


a 


oc 


»-« 1 












h- 1 


>• 










Z 1 


UJ 


UJ 








UJ 1 


a 


s 




•• 




«^ ! 


o 


< 




{T 




1-4 1 


u 


z 




UJ 

z 






f- 


1- 




1-4 


•« 




u 


u 




< 


IT 




3 


3 


• * 


1- 


O 




Q 


Q 


UJ 


z 


X 




O 


O 


1- 


»-i 


j- 




Of 


a 


< 


< 


3 




Q. 


Q. 


a 


s 


< 



o 

z • 
I- 

I 1 (/) z 

3 < UJ UJ 

o »~ s s 

X ►-• 3 3 

h- O CO O 

•-4 HH (/) O 

S Q < Q 

UJ >- z tn 

O 03 O •-< 

Z ♦-• X 

< >- h- H- 
X Z < 

o UJ q: z 

S O H^ 

O h- Q. 

¥- t-t cr oc 
^ o < 

H- S U UJ 

U O Q. 

UJ O H- Q. 

3 Z < 

CQ < UJ 

3 S >- 

CO CO CL < 

< H4 S 

CO 3 

H-i Q Ol- 

UJ UJ < 
h- 3 X 

Z CC -J H 

UJ I- < 

S CO »- (/) 

3 z •-• cr 

O O O O 

o o •-< a 
Q Q q: 

UJ UJ 

if) m 

t-t . > 

X h- z z 

H- O O < 

. Z ^-1 

Z h- DC 

»-« Q < O 

-J q: u- 

Z 3 O 
O O CL > 

►-• X o: h- 

»- CO o »-< 

< O -J 

so »-H 

q: Z H- CQ 
o < z »-• 

U- UJ CO 

Z UJ s z 
•-• U Q. O 
H-l t-l d. 
UJ H- 3 CO 
X O OUJ 

I- z UJ q: 



o 

oc 
>- o 
I- 

l-l ^ 
-J < 
1-1 h- 

< a 



oc 


>- 




00 


oc 




O Q 




UJ 


UJ 


1-4 


(/) 


-1 


3 


Q. 




Q. 


UJ 3 


X U) 


t- 






H 


oc a 


o z 


u. 






tn 


o 


1-4 


UJ 




Sh- 


3 


< 


C/) 


X 


c/) 


h- 


< 





z 
o 



< 
o 

Q. 

q: 
o 
o 



z 

UJ 
Q. 

3 
UJ 



z 
o 



< 

o 
a. 
oc 
o 
o 



3 
Or 



O 



3 
OQ 

cn 

< 



in CL 

3 < 
CD I- 
»-< U 

Z UJ 

3 Q 



O O 

>- q: 

CQ < 

IS 

00 UJ 

t^ Q 

h- • OJ < 

(/) z (/) ^ q: 



>- Q. Z 
I- »-i < 
»-• 3 Q. 
-JOS 
H-l UJ O 
CO U 

•-• z 

(/) O Q 

Z UJ 

o UJ ^- 
a. q: < 

(/)<!-« 

UJ 3E -J 

q: h- 1-4 

u. u. 

O o u. 

z (/) < 






UJ 

< 



o z 



c/l 

3 
Q. O 
O UJ 
CL Q 



I 

1-4 

OC 

a. 
o 
o 



3 
O 



o o 

i-< UJ 

o o 



m 
© 



m 

m 



cs 











»-9 


m 
















s 


Q Q 


1- 
















yjQ 


cr 


















X UJ 


Q O 


XtO 
















1- cj: 


z u 


Of-t 
















♦-} 


I- < o 


I-. X 
















UJ 3 


(/J < 


II- 






l. 










cc a 


UJ (A o 


3! 






(/I 










i-M LU 


1- t- o 


z 






UJ 










UJ 3 DC r 


C/) 1- o 


>!-»-« 






1^ 










1 a Hi 


LU LU (/) CO 


OQ (/) 
















^ UJ CO cr 


z I- UJ ^ 


UJ UJ 






< 










-r- OCt-t 


M H- 


Q H- Of 






f- 










-1 mm 


_J UJ Z 


UJ 3 






< 










Q h- in h- CJ 


CO o o 


S < -1 






Q 










Mi O ^ I/) i-t 


u-o ^- w 


D: H w 






)— 










UJ lij z z cnuj > 


U- X {- 


O < < 






t/) liJ 










TL-Z^ X (- UJ 


o »- a < 


LL Q u. 






ty o 










I- M -J O Q 


LU U 


q: 






h- o 










-J Q CK > 


«/> > Q O 


UJ < < • 






s 










£31 U. O 1- _J 


i-i -1 cr -1 


O. 1 OS 






< 










O U- U- CO h- M < 


X z o 


t/) 1 H 






H UJ 










LL U_ O >- U -1 Z 


H- a H- 


UJ KH C3 > 






< o 










O CO UJ »-i »-i 


z < 


m z X 






Q Z 










Q UJ UJ z m s 


X Q HH 


(D ^-4 H 






< 










yj UJ X »- z < q: 


HZ UJ 


z in z\ 






UJ z 










Q 1 H- o ►-• UJ 


I-I < . _l 


< cr q: 


g 




O UJ 










i-H IT- UJ CJ -J h- 


3 Q CD 


O H- < 1- 


C/J 




O h- 










> ^r- 2: UJ 


UJ UJ < 


i/) 3: > 


H 




s z 










o -J • »-• q: cr UJ 


Q Q h- l- 


Q UJ 'J 


t/) 




(/) t^ 










q: Q ^-. -J yy —1 


UJ O 3 


-f H- . q: 


UJ 




h- a < 










Q. >w CO Q. < 03 


h- S U UJ 


O C/) 


H- 




c/) Q. 1- S 










1- u. s h- < 


CO LU X 


^ . - u. 






UJ o Z 










UJ < (O U- 3 < 1- 


LU UJ K h- • 


^^Q O 


UJ 




h- O »-< H 










q: -J UJ o "3 Q n 


1- O UJ LU 


-1 CJ) 1 


z 




-I CL < Z 










< Q H 3 


z >- cr 


o q: ^ UJ 


Ml 




O OS 3 










N UJ -J >- (/) 


LU < LU U. LU 


c/> ^ 1- 


-1 




•-4 UJ o O 










(/) o UJ X < -J 


D3 z d: •-• X 


CE w J < 






C3 CL -J cr u 










S Z h- « -J < 


UJ < Q h- 


o Q q: 


U. 




O O UJ 










< ••-< u < 


O h- o 


U- Z 


u. 




-1 CJ UJ h- > 










OC '^ ~J . UJ »-t Q 


(o z a 2 Q 


O C3 Q 


o 




to a o cr 










C3 UJ a »- z 


-J HH LU LU 


Q •-• Z 3 






1- o < < 










O O Z O t/) z < 


< < CD O Z 


UJ 1- H-l < 


LU 




3 DC o cr z 




n 






cr < o H-i UJ 


S S H- •-• 


1- CL h- oa 


X 




CL UJ t/) < ^ 










CL U. O < CO C/) 


Z 3 < 


3 O C/) 


1- 




h- H- X CD 




LU 






cr UJ o CO s 


< Z Z > H- 


U UJ 1- 




• • 


3 H cr o 




o 






o UJ 1 -J cr UJ UJ 


O •-< DC Z 


UJ X 1- ►-• 


C/) 


UJ 


O »-• LU -J 




< 






HH »- r- UJ Q 


H < o 


X O -J 


UJ 


cr 


\2 > UJ < 




a. 






t- Z ^ UJ > UJ o 


Q Q CO CO O 


LU 1- UJ Q. 


CD 


< 


H CO »-( ~l »-i 










CO •-• -J 1 UJ q: s 


1 LU LU CO 


»-l -J t/) 


•-» 




3 Z UJ C3 U 










O Q ^ 3 < 


t- H h- LU (/) 


h- 3 CD 


cr 


tn 


a. < o Z UJ 




CM 






Z S ^T- O U- 


T- CO O Z 


o tn < < 


u 


h- 


z q: UJ I-I CL 




in 






a UJ -I X u^ o 


-J UJ LU LU O 


z o 


1/) 


t/) 


►-4 r— cr CO c/> 




•• 






< Q m Q h- 


Q H X Z »-< 


H- O 


UJ 


UJ 






00 






•-H o -J - I/) UJ 


H- h- 


UJ o q: H 


o 


1- 






o 






Q S Q -J S5 UJ to 


Q X (/) U 


cr UJ o 
















N -1 UJ H 3 


Z h- Z 1-4 3 


< -1 U. UJ 


1- 


yj 












UJ I/) O < Q 


< o »-• q: 


UJ 3 


z 


-J 


O "T- CM CO ^ 


tn 


CO 






1-3 O UJ UJ 


CD H- h- 


X CO ca Q 


LU 


ED 


CD CD O O O 


t- 


t^ 






< O Q (/) S Z X 


CJ Q 1-4 to 


u UJ 


^ 


< 


cr cr cr cr cr 


z 


1 






q: z z H- ►-<►-- 


1 UJ * z 


•-I UJ t/) q: 


3 


_J 


C3l CL CL a. Q. 


LU 


q: 




h- 


< O < lO < -J 


-.- cr u to H-1 


X X 3 3 


CJ 


♦-I 




s 


< 




O 


CL DC LU C!J 


^ < z 


3 h- U 


O 


< 




UJ 


^ 




< 


UJ O '--H- u. z z 


-J Q O UJ 


UJ u 


O 


> 




cr 


1 


*- 


cr 


CO Z CO o o •-< 


Q LU UJ »-• X 


t/) C3 CD O 




< 




t— 1 


O IT) 


h- 


> H- h- cr 


CO ^iC t/) H 


1- z 


(/) 






3 


CO 


■ • 


ifi 


O t/) (/) CO UJ LU »-i 


uj UJ cc a: 


tn »-• z >- 


»-« 


LU 




O 




CO 


CD 


3 < UJ UJ CO X 3 


X X < UJ o 


LU (/) < < 


X 


X 




LU 




o 


< 


1- wH- »- 3 h- O 


1- 1- S > H- 


»- 302 


H- 


1- 




cr 


CN CO 


















in o 

O 1 


















T- 


DC 


















"N-*- 


< 


















< s 


ft 














^ 


o 


1 


V 














CM 


CO o 

CO 

> 


















< 


■y- 


















^ 


Q. 


















, 


C3 


















< Q 


















S rsi 



















< 

3 



LU 

o 

z 
< 

z 



CL 

3 

a 

UJ 



CM 



to 

>- 

in 



CL 

a 
a. 



o 
I 



cr 
o 



o 
I 



cr 
o 



Q LU 
! 



tn -J 

wQ 

in u. 

CO 

X ^ 

z 

KO 

o « 
I-. ^ 

O Q. 
LU »-^ 

z cr 
z u 
o tn 
o UJ 
o 
cr 

UJ 
CL Q 

S UJ 

3 -J 

-3 I-I 

< 
-J h- 

< UJ 
»-• Q 

u 
uj-cr 

Q. O 
CO U- 



< 
cr 
o 



CM 

ft 
CM 



o 

LU 

> 
cr 

UJ 

tn 
m 



< 



< 

X 



CL 

LU « 
O ifi 

X q: 

LU UJ 
O 

^< 

iJi o 

^ -I 

UJ 
LU h- 
DT 3 
O -J 
U O 

to 

U. CD 
O < 

-J C3 

-J Z 

< < 

tn Q. 

LU < 

tn cr 

3 I- 

tn 

s i~ 

< o 
cr a 
{3 m 
o 

cr UJ 
a. X 

»-• tr 

X o 



CM 

tu 
cs 

< 
a. 



UJ 

cr 

3 
O 
UJ 
U 
O 

cr 

CL 

z 

< 

o 



< 

a 
a 
o: 
a. 

UJ 
X 



Q 

< 
o 



en 

3 



in 



cr 

LU 

o 
< 
o 

-I 

yj 

I- 

3 
-J 
O 

tn 

CD 

< 

UJ 

X 



O 
O 
O 



.) 



















1- 
o 

z 

UJ 


























2 • 

cr lA 
























4 




















O 3 Q 
























z 




















»— *— 2 




















-J I/I 

-1 3>- 






o 
u 




o 
















UI O 

X or cx 




















»-^ < cr 










UJ 
















CO CO 




















3 o < 






cr 1 




cr « 
















»-< UJ UI 


X 
















o 


t- 






UJ -1 




►H cr 
















3 o or 


▼• 
















UJ 


Dl -It/) 






CL . O 




(/) C/) 
















< 


















♦- 


< -J 






2 uiu. 




UI 
















3 H-i UI 


CO 
















u 


S •-• -1 






3 3 




o UJ 
















o cr 1 


1%. 
















UJ UJ 


3: < 






. -3 Z UI 




X 
















> cr T- 


^ 
















UJ -J C3 • 


(/) S 






Q ^-1 X 




UJ 1- 
















<t V 


















cr UJ < z 


»-• z cr 




,— . 


cy UJ 1- H- 




X 
















o -J 


o 

CO 
















3 (/) t/) ir 


X oo 




«r 


H X 2 " 




I- 2 






















I— 








C/) (/) 3 


1- •-* z 




o 


O h- o s 




i-i 


*«-% 














f- <; 








3 








S UJ 1- 


1- 




CJ 


111 CJ UJ 




2 


(Jl 














II UJ 


UI 








O 








uj < :e UJ 


< < 




o 


-J H Q 




»-4 UJ 


cr 














CM > X 


2 








X 




s 




ic: cr cr 


UJ CJ 




o 


UJ DC CO O 




cr 


en 














'T- CO 1— 


1-4 








1- 




< 


Q. 


< O q: 


s o z 




o 


CO UJ (/) 2 




1- < 










l_ 






DC 


J 








►-« 




tr 


3 


S O O UJ 


1-4 -1 UJ 






CO UI 




UI 


> 








i-t 






CO C3 X 
UI CJ 

LL 3 1-4 










3: 




O z 




cr cr C3 


1- X 




11 


3 z cr UJ 




(/) C/) 


OQ 


























s o o 


h- 


(/) CL cr < 


U) h- 






O H-i CL X 




2 










2 






X 








DC 




< cr i-i 


UJ 


S UJ •-• 


z •-« 




• 


> 1- 




O O 


O 








O 






I-I O X 








O 




CC Q. J— 


(/) • 


< UJ cr 


:.> X Q 




cr 


Q Q 




h- i-i 


UJ 














s-'-J 3 
^ —J 


o 

(0 












O < 


S 


cr X z cr 


LI H- Z 




Q 


2 Z Z O 




H- 


-J 




H- 




^ 












X 




O UJ o 


o < 


O h- < < 


< 




Q 


< < < l_ 




tn Q. 


00 




c/) 




o 






o o 

UI U. h- 








H- 




tr X o 


H- cr 


o u 


h- (/) s 




< 


C3 




z o 


< 




UI 




o 












1— 1 




Q. H- _l 


O 


cr h- UJ 


< i-hO z 






O 2 UJ Q 




o 


z 




1— 




-1 














3 






cr o 


a. < CO < 


cr »-< 




Q 


cr UJ -J UJ 




*-» UI 


UJ 














FHE LII 

ESTED, 

BESSES 


o 

CM 












UJ . z u. 


O (T 


X •-• 


Q S u. < 




< 


CL Q CO H- 




»~ X 






>— 




Q 












Z 




X q: UJ o 


\- a. 


UJ H- 3 X 


UJ < O 




o 


O < CJ 


CO 


O 1- 


u. 




UI z 




2 












3 




h- UJ X 


< 


-J cr 1- 


Q. d: i~ < 




-1 


UI 2 U UI 


in 


3 


1-4 




2 UI 




< 






UJ 

2 








cr 




l_ H- t/) 


cr ui 


OQ O UJ »-( 


>- C3 cc 






X z 


h- 


cr z 






►-I DC 




















z c/) •►»- • 


UJ X 


< Z X 3S 


H O < 1- 




H 


h- UJ UI z 


< 


1- UI 




UI 


1— cr 




Of 












a 




UJ H-i Q z a: 


Ql h- 


1- < H- 


cr 1- 3 




cr 


X X o 




CO X 


z 


C3 


3 3 Z UJ 






3 Q 


—1 








Q 




X C3 UJ UJ UJ 

»- UJ CO h- 1- 

q: 3 z (/) 


O 
a 

UJ z 


U O CO 
UJ .► H 
_J UJ ► 3 


UJ Q. (/) O 
CO UJ 

UJ cr Q 


if) 


< 

1- 


> h- H- O 

u. 

•-H 2 u. ^- 


CM 
CO 

1- 


Z 3 
UJ •• 


3 o o u o on h- 

cr 2 cr «-! 2 3 
UL >- 3 n 




CO UI < 
UI DC 


X 








UJ 




o »-« 


X »-• 


UJ Q ^ Q. 


-J X UJ 


f- 


UJ 


►- o o u. 


< 


1- 3 UI 


UI 


_J 


C3 o <i: z 


J— 


cr 


3 UI 








»-l 




Q X {/) O O 


f- I- 


CO O 1 Z 


-J »- < CL 


(/) 


cr . 


z cr LU 




3 z cr 


00 


-J 


UJ 


cr 




Z 


O 


Qr CO X 


t^ 


CO 






u. 




UJ o t-i UJ 


cr 


S O »-• 


1-4 > 


UJ 


wO 


UJ U- Q -J .. 


o 


o ►-• < 




< 


h- O UJ UI 


»-i 


cr 


UJ < 1— 


in 






1— I 




CO f- UJ DC 


u. < 


UJ 


3 (/) • 1- 


>- 




Q Z -J 


CO 


H- 


O ^- CJ z 


►- 


Z 


cr 


cr 


cr 


^ 








O 




3 H-t UJ X 


O h- 


X UJ O _J 


to o 




O 11 


»-• UJ UJ CO •-• 


h- 


ui z to 


H- 


t/) 


UJ UJ 


i-t 


i-« 


Q- 


UJ 


3*2 

o UI 


r^ 


UJ 






O 




3 2 1- X 


c/) 


1- ♦- Z -J 


l~ UJ O UJ 


o 


o 


1 •-• < 


< 


CL O Z 






_J 




»j 






< 






s 




(/) CO »-• o 


> 


o < 


Z -J CN CO 


1— • 


CI cr 


-J ^ 2 u. 




> (J O UJ UI UJ 1- 


H- 




1— 


z 


o 










HI X 1- »- 


t- o 


u- S • 


UJ Z 


o 


O UI 


-J ^ UI UJ 


in 


h- •-« 


Z 


_J 


(/) < 


»-i 


»— 


t-t 


o 


2 2 CO 




Q. 






z 




UJ o < •-• 


•-• »- 


O UJ UJ cy 


CO 3 Z O 


o 


O CO 


•-^ _l Q -J _l 


CN 


to »- 




00 




00 


O GO UJ 




I-i cr 










UJ 


• 


cy q: < 3 


-J 


cr »-i H- 


LU O 1- 


-J 


O 2 


3 Q O DO -J 


H- 


-J CO CL 


h- 


< 


CL h- 


»— « 


UJ 


HH Q. 


1— 


— J -J UJ 


UI 


in 






UJ 


(T 


Z < S CO CO 


t-t q: 


> ►< 


cr z »-< 




3 


2 < H-i 


< 


~l UJ o 


3 


CO 


O -J 


X 


_J 


X o 


_J 


—J U- 


2 

¥-4 






DO a 


•-H 3 ii: 


DO O 


z z s z 


CL •-• 1- «/) 


1- 


II z 


O UJ O 3 




H-* cr 


Q 


H-l 


o < 


z 


UI 


2 CJ , 


«r 


I-I UI UI 








in 


X Q CO o < 


»-4 ►-« 


< ►H < !_, 


< < UI 


3 




»-» X UI 


CO 


3E a. UI cr c:i 


-J X 


I-I 


CO 


>-*{/) T 


3 X cr 

,-- 1- 
T. cr 

<^ UI UI 


-J 


•• 






CO en cj cr en o 


t/) cr 


cc 2 


(/) o o u 


CL 


o'l 2 1- 1- X UJ (/) 


CM 


_j 


















00 






< 


UJ 


< < UJ -J CO 


z ex 


CD (/) o cr 


UJ < O •-« 


h- 


to < 


en ^_ T k- I- 


2 • 00 


















o 






X 


U S X -J < 


o 


Z ►-< O UJ 


O -J > 


3 


UJ cr a »- 1- CO 


< 


< (/) < 


(0 














X 






UJ 1 




O 


1 > 


Q. z 


t-1 cr h- 


»-i 1- UJ 


o 


cr C3 z u z UJ 




cr z -1 


i 














nr n m 


03 




cr 1 

3 1 


5 
< 


Q. 


UJ UJ UJ -I '-^ 
^ X -1 -1 CD 


(/) o 

UJ »-t 


»- >- CL 

cr h- • 


> 3 H- Q 
UJ O < 




Q a C!J UJ »-< U_ h- 
Q CC < Z t-t 


CI 
CM 


a o •-• 
o •-• < 


o 


h* 


o 

0> -r- 


^ 


CJ n ^ in 


THE PROGl 
TEST. TYI 
LINE NUMl 


(O 

in 


r^ 




Q 1 


(r 




O H- O < t^ 


cr 1- 


< ♦- -J cr 


Q u. cr 


3 


< CL 


>-• z cr CD l~ 


cr 1- > .... 


cr 


cr 


cr Q? 


Of 


er 


cr rr 


ry 


q: 




UJ 1 
O 1 


O UJ CO en u ▼- 
O -J Z »- Z »-i-^ 


< 
UJ o 


1- < 3 

CO UJ a cj 


Q Q O 3 
U- UJ UJ u 


CL 
Z 


o UJ 


Q O O ►Z 
O h- UJ i-i 


< 


CLCL<C0l/)CO(/)(/)l/)C0C/l(/) 

o 


< 




O 1 


q: 


O O < O h- 


X o 


X UJ (J 


o CL t~ a o 


»-« 


< CL UJ (O O ^- 3 




UJ UI 
















o 
o 


S 




oc 1 


a. 


CO 


u o < cr 


J- -J 


UJ »- -1 o 


>- cr < o 




o >- 


X H-i UJ o o 




X cr X 
















1 


w- 


ex. 1 




z 


(/) S (/) 




cr 


CL 1- < 2 




-J I- h- Q Z Z -J 




1— C/) h- 
















o m 


1 


(/) o < i^ < O H- 


</) CO 


O 1- < -J 


< H- -J 


o 
























UJ 

2 


n 


•• 


UJ 1 


t— « 


o 


O H- U- 


- l-t 


u. < _J 


2 UJ en UI -J 


C3 




























00 


(/) 1 


X 




u. O U. 3 O 


h- X 


UJ X (/) J-^ 


00 UJ X ♦-• 


cr 


, 






, 


















^ 


o 


3 1 


H- 


< 


♦-I -J 1-1 < (/) 


^H H- 


00 1- ♦H 3S 


< cr 1- 3 


Q. 


< 






OQ 
















o 


-J 


CM CXI 

in t^ 
o 1 












































T- 


Of 












































< 

o 


< 

f 


• 














» 




























wo 

>- 
o 












































< 


v 












































s 


DL 

d 












































z 


< 












































I-* 


_j 












































< Q 

























































































o 

o 
o 



m 



a 











h- 




o 










































o 




z 






























1 












Ul 




< 




















1- 










cn 












J 
























i-« 






1 




Ui UJ 












UJ 




(3) 
















1 




S t 






o 




>- CO o 








X X X >< X K 




en 




cr 
















O Ul 




en cn 






O Ui 




< o 








CM C*) KT in (D t*- 








z cn 
















z cr 




z z 






z cr 




-1 -J 3 








^_ ^_ ^_ ^_ ^_ ,_ 




3 > 




• o • 
















< 




< < 






< 




Ui -J en 








to CD CD (D (0 CO 




O -J 




>- i-i en UJ 
















en 




cc cr 






cn 




Q i-» 


« 






t^ t^ t^ t^ t^ t*«- 




>- -J 




^ 1- Ui cn 
















• < 




> 1- »- 






• < 




3 Z 


cn 






f- r- t** t^ i^ . - 




< 




-J Z X 3 
< Ul O 
















a 

UJ % 




< 

J -J Ul 






Q 
UJ % 




< Ui 
Ui Ui 


1- 

3 






T- CM CO «^ in CO 




^\l- 




u > 1- cn 
















>- 




Ui -J > 






H- 




a 1 3 


a 






CO CO CO CO CO o 




o z 

UJ 




IH4 cr «-> 1- 
h- UJ 3 cn 










cr 






O UJ 

Ui z 




Q «-i »-i 

3 en 


cn 




u UJ 

Ul z 




Z *- 1- 
< ^ Ul 


UJ 
CL 






UJ UJ LU LLl LLl UJ 




a 3 




< h- cn Ul 










O 






J 1-1 




< cn 


h- 




J 1-4 




-J m 


> 






Z 2 Z Z Z Z 




OO 




S Z 1- 








o 


1- 






UJ ^ 




UJ Ul 


3 




UJ -J 




►Q 


j- 






f-l 1-4 »-l 1-4 1— 1 »-i 




Ui 




o •-« z 








z o 






cn 




Q 1 u 


O 




cn 




Ul UJ 












UJ en 




h- O UJ 

13 _j H-. tn 


z 




u. 


< 


UJ 

> 






Ul 

3 X 




z ^u 

< '- 3 


Ul 
CL 




UJ 
3 X 




Q Ui 2 

on*-* 


O 

z 










^ a 




< < h- UJ 


o 




O Q 








OH- 




-J to 


> 




O h- 




U h- 1- 


Ul 






X X X X X X 


X 


y Z 




3 O X 


I-I 


C3 




UJ 


a. 






> 




►Q 


}- 




>- 












CM CO "^ in CD t^ 


o 


-J < 




z z Ul h- 


V- 


z 


cr 


H 


< 






UJ 




Ui z 






UJ 




cr 1- Q 


DC 






o o o o o o 


■r- 


Q 




3 < -J 


a. 


1— 1 


UJ 


cr 


DC 




x-% 


S CL 




O Ul UJ 


a 




^ S CL 




UJ < Ui 


o 






vD CD CD CO CD (D 


co 


> 




cr s UJ UJ 


I-I 


cr 


CO 


< 


h- 




^ 


< > 


. 


O X Ul 


z 




^ < >- 




H- X en 








IX. IK. t^ t^ t^ (s. 


l^ 


UJ -J 




cn h- 


cr 




S 


h- 






o 


cr 1- 


z 


O >- 3 


UJ 




o cr h- 


• 


O F- CL 


cr 






t^ t^ tX. (N* t*. t^ 


t^ 


X -J 




Ul Ul 3 


o 


_j 


3 


en 


cn 




CM 


CD 


cr 


l_ 






CM o 


z 


< < 


o 










h- < 




CO cr Q u 


10 


_j 


Z 




1- 




o 


o • 


3 


q: < UJ 


cr 




o o . 


cr 


cc < -J 


DC 






T- CM CO ^ in CD rx 


O 




»-( UJ Ul 


UJ 


M 




h- 


»-i 




o 


cr 1- 


H- 


Ul H- CD 


o 




o cr h- 


3 


< H- Ul 


cr 






CM CM CM CN CM CM 


CM 


o ^ 




h- 3 UJ X 


o 


3 UJ CO 






o 


CL to 


UJ 


1- < 






o CL en 


h- 


X < 


Ui 










Z H- 




o cycL UJ 






X < Q 






UJ 


cr 


O Q Q 


cr 




Ul 


Ui 


U Q Ul 








IXI UJ UJ HI UJ UJ lil 


H-i < 




z UJ cn 


cr 


-1 


1- 


-j 


z 




11 


Ui H 




< UJ 


o 




II UJ 1- 


cr 


X 


H 






z z z z z z 


z 


^ s 




cr o 


o 


-J 






< 






X 


UJ 


cr Ui en 


cr 




X 




»- Ul h- 


3 








l-l 


en o 




_J UJ I- 


cr 


UJ X s 






1- 


h- O C3 


< X CL 


cr 




1- h- O Ul 


en X 


O 






_J -J -J -J -J -J 


J 


UJ H- 




-1 X X 


cr 


CD 


^- < 


h- 




cr 


h- 


< 


X h- < 


Ul 




cr H- C!3 


Ui H en 


X 










H- 3 




i-« U h- • 


Ul 




I-I 


q: en 




< 


> 


f-i 


U -J 






< >- 


< 


H ►-« 


H 










< 




3 •-• O 




Ul 3 C9 Ui 




1- 


U- X CC 


en Ul 


^ 




1- U. X 


I-I 


en 


>-< 






X X X X X X X 


Z 




X 1- '^ • 


cr 


X 




O H- 




en 


»-• cn 


cr 


< t-« 


3 




cn *-• en 


cr 


< »-i > 


3 






CM CO ^ in CD t^ 


o 


•-I Q 




cn 3 en 1- s 


O 


1- 


s 


q: 




a. 


Ul 


h- M 


< 


Ul cr 


o 




Ul t- *-* 


cc 


< 








t^ t^ i^ t- t^ r^ 


o 


O UJ 


• 


1- Ul -UJ 


u. 






Q. 


tr 


o 


cr • 


Z 3 


o 


1- Ul s UJ 


X 




cr • z 3 < 


h- Ui -i 


Z 






in in in in in in CD 


uji-Qcntoi-'^ri 




en 


II 




UJ 


o 


>— ' T- 


UJ 




cn Q ►-• 1- 


1- 




wCM Ul 


o 


en o Ul 


3 


^ 




c^ t^ t** r^ t^ r^ 


t^x 


cQ en UJ UJ 1- CO 1- 


CM 


CO 




Ul 


Q 


-J 




Q 3 


< 


Ul O h- o 


1-1 


CL 


Q 3 




Ul o Q 


cr 






t^ t^ t^ t^ t^ h. 


t^ 


Ul 


J- 1- cn o 1- 


• 


< cn u z 




O II 


►-^ O 




3 u < 


3 


o 


O II •-• o < 


3 U 




liJ 








3 1- o 


ILI 1- 1- 


V- 


CL 


en 


z 


3 


UJ 


o 


> 


> 


O Ul cr 




o 


o >- 




Or Ui 


3 


< 
a. 




T- CN CO -^ in CO r^ 


o 
Z UJ 

CD 


UJ 


u h- en o 
*-* o 1- UJ 
C!) o Ul en -J 


in 


yj « tfs if% 


a. 
a 
o 


CM (T 
O Ul 


_J 
-J :«»: 

t-i 


m 


UJ cr X < 
cr UJ H- X 


Z 
3 


-J 


CM cr -J 

O Ul -J :tl: 

o en »-• 


>- 

CQ 


Ul cr X 

cr uii- 

i- 


O 

z 








UJ 


H- 






CO 


Q 


UJ 






UJ UJ UJ UJ Ul UJ 


Ui 


-J 


to O 3 CO Ul Ul 


z 


Ul 


Q Q 


Ul 


en 


o s 


3 Ul Ul 


-J o en 




CL 


o S 3 UJ C3 


-1 o Q • 


-I 






z z z z z z 


z 


-J _J 




-J 1- 3 H- en 


o 


_J 


z 


Ul 


cr 




3 


z 


3 


-J < ►-• UJ 


_j 


O 


3 Z 


UJ 


-J < z cn 


-1 


Oi 






*-4 


i-i _l 


CO 




H-l 


CL 


Ul 


H 


a 


q: 


II z 


o ►-• 


O 


»-• cr z 


_j 


o 


M Z U ►-• 


3 


»-i cr < oc 


>-l 


in 




-J _J _l _J -1 _J 


-J 


3.»-^ 


»-l 


-J Ul UJ Ul o 


1- 


S 


s 


Ui o 


Ul 




_ _J 


_J 


3 < >- O 


»-i 


en 


t-i _J 


O 


3 < UI 


3 


•• 








3 




-J cr cr q: 1- 


o 


o 




_J 


< 


1- 


cn s H- 


J 


X < 


3 




en s h- 


-J 


X a 1- 




CD 








S' 


CM 


< < < < 


Ul 


u 


> 


a. 




i- 


en < 


en Ul 


1 


S U -1 U- 




cr 


U) < lA Ui 


--J 


S u z o 


S 


O 




X X X X X X 


X 


< en 


T- 


CO 


en 




QQ S Ul 


►-I 


Ul q: o X 


JU 


< Ul o 


S 


Ul 


Ul DC o X o 


< 1-4 < 


< 






oj CO ^ in CD t^ 


o 


d: - 


Df 


• • Ul X UJ 1 




UJ 




o u 


S 


cr o 


Z h- 




cr UJ Q 


< 


> 


cr a z f- 


U- 


CC Ul h- DC 


or 






CD CD CD CD in CD 


r^ 


O t- 


cn 


UJ cr o en o 


o 


Z Q O 


1— 1 


to 


Q O CD 


- 


ox en 


o 


»-i 


Q o o 




O X H- < 


C3 


00 




in in in in CD in 


in 


O T- 




h- Ul t-i UJ 


\- 


O Ul 




> 


z 


Q cc 


< 1- 


Q 


O »- UJ z 


o 


Ul 


Q cc < h- 


» 


O »- »-« X 


o 


t^ 




I^ (s* ts. t^ 1%. t^ 


t^ 


□C -1 


en o X X X cr 






3 en Ul 


< 


< Q. 


•-• en 


Ul 


cr X o 


cr 


o 


< CL I-I to Ci 


cr so 


cr 


1 




r^ t^ f^ t^ t^ t^ t*« 


a Q en 


z H- 3 1- en 


cc 


cr 


O Ul 


Q 


cr 




o UJ 


H- 


CL . 1- I-I 


Q. 


Ul 


o Ui Ul 


CL . en 


CL 


cr 










Ul 




UJ 


UJ 


-1 


en 




1- 


O Ul 


3 


to 


UJ to 




cr 


Q Ui 3 H- 


UJ z Ul 




< 




^ CM CO ^ in CO t^ 


UJ -J 


-J 




u. 


H- 


_j 


to 


Ul 




< Q. Ul O Ul 


Ul s Q en 


UJ 




< CL Ul oen 


Ul s < > 


UJ 


s 




o o o o o o 


o 


I -J 


z 




Ul 


u. 


O < X 


1 


O >- X Ul 3 


X ♦-• z ►-• 


X 


1 


O >- X Ul Ul 


X i-< cr i-« 


X 


1 


r- 






1- < 3 




cr 


< 


u. 


Q. 


1- 




-J 1- 1- a o 


H- 1- < 2 


h- 




-1 1- h- cr 3 


1- 1- 1- en 


H 


o in 


Ul UJ UJ UJ UJ UJ 


UJ 


















7" 












CM 










CO 


• • 


z z z z z z z 


















o 












C5 












CD 




t-t 


• 






• 


• 








q: 


• 






• 


• 


cr 


a 




• 


, 




O 


-J «J «J -J _J _J 


J 


Q 






Ui 


U. 








CL 


< 






03 


o 


CL 


< 




cn 


O 


CI 00 












































in t^ 

O 1 














































cr 












































N-^ 


< 






















CM 












CO 










< s 






















« 












* 










o 


1 






















^ 












^ 










CO o 
CO 

> 
o 












































< 


*- 












































S' 














































z < 












































t-H 


-I 












































< a 












































^ ISI 













































s 

o 

cr 

III 
m 



< 
a. 



in 



o 



CD 

< 

o in 
o •• 

00 

o 

C4 00 

in t"* 
o I 

< s 

o I 

w o 

PI 



«n 

UJ 



< 
a 

UJ 

o 
o 



< 



I- 
o 

< 

< 
X 
O 



o 



m 
a. 






o 

CM 
O 
O 
O 



OC 

< 



QC • 
O li 

o 
CM a: 

O LLl 
O CD 

o s 
It z 

c/) < 
UJ cr 
d: o 
o o 
Q cc 

< Q. 
O UJ 

< a 
o > 



I 
a 

Q UJ 

z cr 
< 
tn 
•< 
a 

UJ % 

I- 

U UJ 

UJ z 



C/) 
UJ 

3 X 
O h- 

>- 

UJ 

S Q. 

< >- 

a: h- • 
O z 
o • oc 
cr i~ Z3 
DL to h- 

UJ UJ 

UJ H cr 

X 

f- O UJ 

I- o 

>- < 

U. X •-• 

»-« o) cc 

I- i-i QC 
Z 3 < 
UJ u 
Q 3 
•-•O < 

>-■ 
-J > 
■J :& OQ 

3 UJ O 

z UJ 

O i-t 3B 

i-i -J O 
H -I 

tn UJ -J 

o X o 

z h- u- 
o 

< H- ► 
•-•0)0 
CD UJ UJ 

3 I- 
UJ c>(/) 

X UJ UJ 

h- cr 3 



! 

cr 
< 

X 

u 



en 

UJ 



UJ 

X 



UJ 

a. 
> 



cr 

UJ 

I- 
o 

< • 
cr z 

< cr 

X 3 

O f- 

UJ 

F- cr 
en 

UJ UJ 
H- C!> 

< 

< ♦-• 
cr 

h- oc 
en < 
UJ u 

3 
UJ 

cr > 

00 

-J 

-I Q 
I--I UJ 

O 

S -J 

< -I 

cr o 
O u_ 

o 

q: ► 
a. oc 

UJ 
UJ I- 

X o 



< 
o 

> 

z 
< 

C3 



o 

Q. 



tn 
o 

3 
Z 



o 
o 

z 

3 

cr 

3: 
O 

z 



< 
cr 
o 
o 
cr 

a. • 
to 

UJ UJ 

X cr 

H- 3 



U 



< 

o 

UJ 

o 
o 



z 
< 



z 

3 

o 
o 

> 

cr 

< 

z 



< 
o 

UJ 

a. 
in 



oc 



in 



O II 

o 

CM cr 

O UJ 
O 00 

O 2 

3 

II Z 

cn s 
tn < 
UJ cr 
cr o 
Q o 
Q cr 

< CL 

O UJ 

< Q. 

O >- 



I 
o 

Ck UJ 

z cr 
< 
in 

Q 

111 % 
I- 
U UJ 

UJ z 
~l (-1 

UJ -J 

to 

UJ 

3 X 
O I- 

UJ 
SCL 

< > 

cr I- • 
i3 z 
O • IT 
cr H 3 
DL tn h- 

UJ UJ 

UJ I- cr 

X 

>- O UJ 

I- C3 

>- < 

U- X »-l 

»-« en cr 
h- i-t cr 
z X < 
UJ u 

Q 3 

»-io < 

>- 
-J > 

-J % CO 

3 UJ Q 
Z UJ 
O »-< 3 
>-< _J O 
>- -I 

(n UJ -I 
o X o 

Z H U- 

o 

< h- ► 
•-• tn Q 

O UJ UJ 

3 I- 

uj otn 

X UJ UJ 

I- cr 3 



Q 

UJ 

u 

UJ 
UJ 

tn 

3 
O 
>■ 

UJ 

z 



UJ 

X 



z 



tn tn 
UJ cr 

►- o 

cr 

z cr 

1-4 UJ 

o 

UJ < 

ca K 
< 

-J Q 

•-I >- 

3 Z 
< 
S 

< I- 
cr cr 
C3 o 
o Q- 
cr UJ 
a. cr 

UJ o 

X z 
I- < 



to 

UJ 



o 
o 



a 3 

•-• CL 

h- I- 

Q. 3 

•-• O 

cr ^ 

O I- 

tn 3 

UJ Q. 

Q Z 

< I 

cr 

o o 

O C3 

DC cr 

OL CL 



in in 



X ^ 

o tn 

»-• UJ 3 
X UJ S 

s tn 

wcr 
in o 

Z UJ u 

»-4 CL UJ 

H- O Z 

3 O Z 

O -J o 

cr u 
> 

00 -I UJ 
w< CL 
l^ 3 S 

ino 3 

•-• 3 
u. > 
O »-< UJ • 

Q X UJ 
H Z H i 

tn fr-^ T- 

1-1 ▼- 

tn cr • -I 

Z O'-^Q 

o tn 
u cr o u. 
UJ z •-« 
tn Q »-i 
I- cr I- o 
in o H z 

UJ UJ I-I 

I- ^ tn H- 
< cr 
o»-< X < 
•-• H- u I- 
o z »- en 

O UJ 1-4 

-J 3 »UJ 

O'tn cr 
I- UJ o 
3 tn cr u- 

CL O UJ 
H Z; U- DO 
3 »-< 

O U Q 
\Z UJ 
h- 3 -H 

3 cr *- cr 
a. • UJ 
z UJ «sr en 
»-• OQ z 
I- »-« 
UJ >- o 

X < UJ UJ 

}- S en en 









2 
















O 
















*-4 
















1- 
















o 
















UJ 
















-J 




J- 










z 


UJ 




o 








z 


o 


en 




UJ 






UJ 


»-l 






-J 








>- 


1- 


Q 




UJ 








1- 


o 


UJ 




en 






Q .-. 


3 


UJ 






z 






z cr 


cr 


a 




Q 


3 






< B 


H 


in 




UJ 


IT 






en "^ 


en ^- 






UJ 


cr 






cr en Q 


z •-• 


1- 


1- 


CL 


UJ 






CQ cr < 


I-I CD 


»-i 


»-i 


en 


> 






O CO UJ 




s 


OQ 




o 






o cr 


1- >- en 




cr 








«aa 


UJ o 


z 


UJ 


UJ 


< 






UJ UJ 


to < < 


z 


> 


1- 






en X OQ 


UJ UJ 


cc 


o 


>-i 


< 






cr h- 


cr cr 


h- 


o 


UJ 


Q 






tn z 








u 








o z < 


u. u. 


u. 


u. 


liJ 


u. 






•-• o 
u. 
O en >- 


O o o 


o 


cr 


o 






z z z 


z 


z 


z 


Jlllili 




H- UJ 


o o o 


o 


o 


o 






> I-I X 


»-l 1— 1 


1-4 


►-« 


1-4 


♦-« 


'^^liiilllli 




H- CQ h- 


H- h- 


»- 


l_ 


|_ 


1- 






»-4 


< < < 


< 


< 


< 






-J -J 1- 


cr cr 


cr 


cr 


OC 


cr 






►-. -J < 


UJ UJ UJ 


UJ 


UJ 


UJ 






DO < X . 


CL CL 


CL 


Q. 


CL 


CL 






< h- >- 


O O o 


o 


o 


o 






en to -J 
















tn UJ en cr 


cr cr 


cr 


cr 


cr 


cr 




en 


UJ -J :^ UJ 


ly Lu 


UJ 


UJ 


UJ 


UJ 




1- 


q: Q o CL 


CL Q. 


Q. 


CL 


CL 


CL 




en 


Q O UJ o 


o o o 


o 


o 


o 




UJ 


Q »-< X cr 


cr cr 


cr 


cr 


cr 


cr 




h- 


< Q U CL 


CL CL 


CL 


Q. 


CL 


Q. 





en 

z 
o 



cr 
u 
en 

UJ 

o 

UJ 

z 
J- 

3 
O 
OC 



m 



UJ CO CM 

Z J- H 

I-I < < 

I- I I 

3 o 'cr 

o I- h- 

cr < < 



CM 
W 

< 
1 


CO 

1- 
< 






-r- CO -^r 

C*) O CO 


1 

in 

CO 


o 


5 



o 

< ^ 



• i3 

z < 

•-I -J 

< Q 

• O 



m 
o 



m 

m 







UJ 














z 














o 












1/1 


o 












1- 










^ 




Q. 


q: 








J-8 




3 


< 








m 




cr 


Ul 




UJ 








o: 


-1 




Q 




:£ 




LU 


o 




O 




< 




h- 






^ 




UJ 




2 


1- 


►- 






cr 




»-« 


o 


Q. 


Ul 


cr 


m 






z 


3 


u 


Ul 






u. 




a 


z 


Q. 


u. 




O 


1/) 


cr 


< 


s 


o 






Ul 


Ul 


z 


3 






z 


o 


1- 


UJ 


-3 


z 




o 


Q 


z 


H- 




o 




»-J 




♦-• 


z 


X 


►-« 




h- 


q: 




t-l 


h- 


>- 




< 


(/I 


m 


< 


>-i 


< 




tr 


o 


UJ 


s 


s 


cr 




UJ 


X 


m 






Ul 




a 


q: 


3 


H 


1- 


a. 




o 




< 


(/) 


C/) 


a 






C3 


O 


UJ 


UJ 






oc 


z 




1- 


l- 


cr 




UJ 


l-l 


cr 






Ul 




a. 


Q 


o 


< 


< 


CL 




o 


< 


cr 


h- 


1- 


o 


(D 


cr 


Ul 


cr 


< 


< 


cr 




CL 


cr 


Ul 


O 


o 


CL 


UJ 














O 














< 














a. 














CJ 














m 


Cj 












• 4 


m 












00 


f- 












o 


f 














1 

CM 


CO 


^ 


m 


(0 


i^ 


GO 


Kt 


in 


in 


in 


in 


in 


t>- 


1- 


h- 


1- 


h- 


1- 


i_ 


1 


< 


< 


< 


< 


< 


< 


tr 














< 














S 




























OIO 














CO .» 














00 














o 




























CM 00 














in t^ 














O 1 














T- DC 














w< 














<s 














O 1 














WO 














CO 














"9— 














.,r> 














> 














o 














< ^ 














s ^ 














Gb 














« 














• o 














2 < 














»-« -J 














< Q 














^ rM 














. o 



















H 


















HI 


















m 


















H 


















cr 


















UJ 


















o 


















z 










1- 








3 










u 

Ul Ul 






»9 


UJ 










cr o 






C/) 


o 










cr < 






H- »-« 


M 










o in 






O 


> 










o in 






Z H- 


UJ 










z UJ 






< 


O 










9-1 S 






t/>S 


















»-* cr 


u. 










in cr 






o 


O 










•-« o 






lU- 












cr 






o 


en 










Ul cr 






h- >- 


in 










1 Ul 






►-• 3 


Ul 






cr 










SO 


cr 






O 




■5- Z 






CO H- 


Q 






ot 




-J < 






z 


Q 






cr 




Q 






H »-• 


< 




1 


UJ 




O 






3 cr 


s-» 




1 






O Z 






O CL 


II -^ 




1 


< 




Z < 






1- 


cr Ul 




•• 


¥- 




i-« 






Z Ul 


in -J 




in < 




H- cr 






•-< I 


O CD 




< Q 




«L 3 






cr h- 


X < 




3 






3 O 






CL 


cr o 






< 




ceo 






1- • 


<^_i 




1 


o 




UJ 






*-^ t/i 


-J CL 






z 


• 


1- _j 






DQ h- 


-J CL 




03 


l-« 


UJ Z -1 






l-t _J 


< < 




\ 


h- 


3 


»-• ¥-* 






X 3 


U 




in 


< 


Z 


3B 






Z (/) 


u. 






o 


¥-i 


Ul 






H-i Ul 


cr •-« 




< 


l-t 


1- X z 






cr 


O w 




>- a 


z ^-o 






UJ 


cr 




< z 


o 


1-4 






1 1- 


cr UJ 




Q 


l-« 


p > 1- 






i- 3 


Ul o 










QQ < 






O 


< 


X 


X 




in 


O 






Q f- 


u. en 


X 


X 




in Q o 






z z 


o <n 


X 


X 




UJ 


UJ J 






< •-• 


Ul 


X 


X 




cr 


Q 






cr 


u s 


il 


II 




CL 


►-I CD 






in CL 


CL \ 


cr 


cr 






> Z 




z 


_j 


w_J 


in 


m 




O O O 




o 


.-4 < 


II < 


o 


o 




z 


cr cr 


cr 


t-i 


< 


o z 


X 


X 




•-« 


CL 3: 


o 


*— 


u. ^-% 


CL O 


q: 


cr 




■ H- 




1- 


a. 


CO 


H4 








in cr UJ 


o 


>-» 


UJ T- 


1- 


X 


X 




Ul O X 


UJ 


cr 


z q: 


.-*« »-» 


X 


X 




h- 


1- 1- . 


^ 


O 


^ in 


% CIS 


X 


X 






o cc 


z 


en 


1- w 


UJ Q 


X 


X 




Ul UJ O 3 


o 


Ul 


3 


z < 


II 


II 




S > 1- o 


u 


Q 


O Q 


>-« 


o 


u 




3 


o 






IT UJ 


h- z 


a 


CL 




10 Ul CL O 


cr 


cr 


-J 


3 < 








Ul 


X < 


Ul 


O 


< OQ 


O 


in 


CM 




cr 


1- cr -J 


a 


cc 


< 


cr a 


o 


CM 






J- _j 


s 


cr 


U. Z 


wZ 


o 






o 


U- i-i 


3 


Ul 


^^ Ul 


^- < 


h- 


h- 




1- 


v-« < 3! 


-D 



u 



cr 
o 
I- o 

< Ul > o < 

O > -J ~l H 
l-l l-l _J << 
Q Ul < Ul O I- 
Z O 3 I -^^sO 
►-, Ul I- t- UJ 2 

q: u *- I 
o < J *- in 

z >■ Q 1- »-4 

»-• cr in -J 

cc O »-• C!J Q Ul 

w(/) z -J 

>-l I— H4 Ul CO 

to > Ul I- X < 

Ul cc CO in I- o 

h- UJ Ul 

< CL < I- S Ul 
O 3 h- ox 

in < o cr I- 
Q h- u- 
co cs \u. 

- z < z o ►-« 

U- < O H 

\ in ►-< -J 
u. *in I- o »-« 

Q Ul »-i 2 < 
Ul z -J C3 ►-• u- 
in Ul z Q cr 
o in 3 < ►-< -J 
X s -I 
I- o Q z »-4 

h- UJ »-« UJ S 

in I- -I 
H- cc in CO in 
in < Ul . < h- 
Ul Ul F- UJ u in •• 

>- -I I UJ Ul 

o UJ ^ in h- I 

cr en r- h- r- 

o ► -I in CJ t- 

h- Z h- Q UJ z -I 

u o o ^ y-> a 

Ul ►-I z Ul s 
Z h- Z X O O Ul 

z ►-< < I- in -J X 

o in u -J -I H 

o z o < o 

< X I- u_ z 

cr cr u cr »-i 

Ul h- i-i o UJ UJ 

CL X UJ CL X Q 

2 cr s I- s h- Ul 

3 Ul O 3 -I 
-D H-i -^Ul -D -J 

cr < z . < 
UJ cr H- z UJ h- in 
X < < o X Ul z 
H O Q U I- CO »-i 



10 



CM 
CO 



o 

CO 



in 

CM 



CO 
CM 



CM 



CM 



in 



in 



CL 
O 
O 



CL 

o 
u 
in 

cr 

Ul 



in 

z 
< 
cr 



(3 
cr 

CL 



CM 



! 

cc T- 

UJ ^ . 

»- -J Q 

I- Q UJ 

M Q 

2 Q »-« 

in UJ > 

Z H-l o 

< u. cr 

cc l-l CL 

I- u 

Ul Ul 
U. Q. cc 

o in < 

o cr in 

z Ul I- 

•-• CO 3 

CL 3 O 

O h- 

O C3 Z 

CO Z »-4 

l-l cr 

3S CO CL 

O 3 

-J cr 
-J z O 

< o cr 

l-l cr 

o h- Ul 



CL 

o 
o 



Q O 

in z z 
F-i o 
o 

T- . UJ 

C3 Z < Q. 

cr 3 I- o 

CL cc < <J 

Q in 
u. < 
o o cr 

-Z Z UJ 
Ul l-l < > 

in 1-4 
o in CO Ul 
CL z cc u 

cc O UJ Ul 

3 •-• I- cr 

CL I- < 

o s 
UJ z cc 

X 3 < 
>- U- CL 



CM 
O 

cr 

CL 



in 

z 
o 

o cr 

Z UJ 
3 1- 
U. UJ 

cr < 
Ul cr 
> < 

>-« CL 
UJ 

o Ul 

UJ I 

cr t- 

u I Q 

O O UJ 

o 

C5 Q l-l 

z Ul > 
l-l l-l o 

CL U- cc 
O 1-4 CL 
O O 
CO UJ Ul 

CL cr 
s in < 
o 
-J cr in 

~l Ul i- 

< in 3 

3 o 
o H- 

h- a z 

z ►-i 
CO l-l cr 
M en ql 

3 

CM cr 
o z o 
cr o cc 
CL 1-4 cr 

H- UJ 
U. l-l 
O Q O 

z z 

Ul O 

in o 
o 

CL z < 
cr 3 H 
3 cr < 
CL a 

Ul o 

X z z 
h- 1-« < 



CO 

m 



) 



C/) 

3 






to 

3 









Q 




o 


cn 


< 

X • 












Q 




UJ 


UJ 


1- en 












LU 




Q 


h- 


cr 










h- 


> 




i-< 




h- UJ 










to 


1-4 




> 


< 


CL h- 










liJ 


ui 




o 


h- 


UJ UJ 




• 






H- 


o • 




cr 


< 


O 2 




a 








tu < 




Q. 


Q 


X < 




HI 






< 


cr h- 








UJ cr 




o 






1- 


< 




UJ 


UJ 


< 




t-H 






< 


t/l Q 




cr 


Q 


^ a 




> 






Q 


O Q 




< 


o 

s 


in 
o 




o 
cr 






Hi 


UJ z 




(/) 




UJ z 




CL 






a 


X < 




1- 


h- 


z •-• 










o 


u 




3 


z 


»-• z 




UJ 






s 


•• 




O 


l-l 


1- z 




cr 








Q tn 




l_ 


< 


3 3 




< 






1- 


z cr 




z 


s 


o cr 






t^ 




z 


< UJ 




l-« 




cr 




in 






l-l 


h- 




cr 


H 


UJ 




j- 


UJ 




< 


1/) UI 




CL 


z 


O 1 




3 


o 




s 


UJ S 






3 


o ^ 




O 


< 






> < 




cr 


O 


cr *- 




»- 


a. 




a 


►-I cr 




o 


O 


CL -1 




z 






llJ 


UJ < 




cr 




Q 




»-l 






1- 


O CL 




cr 


> 


en 




cr 


Oi 




o 


UJ 




UJ 


cr 


< in 




CL 


in 




< 


cr UJ 






< 


UJ 






•• 




cr 


1 




>- 


z 


UJ 1-4 




> 


en 




< 




tn 


cr 


»-i 


S UL 


cn 


cr 


o 




X 


en ^ 


H 


O 


CO 


< ►"! 


H 


O 






o 


I- _j 


3 


h- 




10 u 


3 


h- 








»-l Q 


O 


1-4 


-1 


UJ 


O 


< 


00 




UJ 


.s 


h- 


z 


< 


UJ CL 


l_ 


z 


r^ 




_J 


c/) 


z 


< 


>-• 


X U) 


Z 


< 


1 




o 


Z Q 




-J 


o 


1- 


i_i 


_j 


cr 




z 


< Ul 


cr 


CL 


UJ 


cr 


cr 


CL 


< 




♦-• 


cr ♦-• 


Q. 


X 


CL 


en UJ 


CL 


X 


S 




(/) 


H- u. 




UJ 


en 


*-* in 




UJ 




▼- 


1 


>-i 


cr 




1 


3 


cr 




o in 


CO 


CO o 


O 


u. 


^ 


^ 


o 


U- 


CO 


•• 


o 


CD UJ 


cr 


—1 


C3 


C3 UJ 


cr 


_J 




00 


cr 


cr CL 


on 


UJ 


cr 


CC X 


cr 


UJ 




o 


a. 


OL (/) 


UJ 


C/) 


CL 


CL h- 


UJ 


to 






















Oi 


00 


















in 


l^ 


















o 


1 






^m 








v— 




1— 


a: 






• 








• 




v--- 


< 


•^ 




^ 




in 




in 




< s 


9 




• 




• 




• 




o 


1 


in 




in 




in 




m 




CO o 




















CO 


















■r- 




















*- 




















>- 




















u 




















< 


T- 


















s 


a. 
6 


















2 


< 


















•-I 


_j 


















< a 


















S M 




















o 



















cr 

UJ 

o 

CL 



o 

m 



in UJ 

Z X 

o I- cr 
^ o 

H- Z »- 
CL UJ < 

o X cr 

3- UJ 

cr CL 

CO -I o 

I— I 

h- < UJ 
Z U. lO 
UJ < 

in >- o 

UJ < 

cr s in 

CL H4 

cr X 

UJ UJ 1- 

X s 
I- o z 

o 

z UJ ► 

►-I X z 

CO K- O 

Z) H4 
h- UJ O 

cr K 3 

< o cr 

I- Z H 

in in 

UJ . z 
cr Q «-H 

UJ 

>. I — 

-J o 1- 
-J UJ UJ 

< -J to 
o UJ UJ 
»-< CO cr 
I- 

< >- 

S -J < 

o to 
h- 3 a 

3 O Z 

<t l-l »-• 

> H- 

-J UJ 3 

_j cr o 

^ CL UJ 

3 X 

UJ UJ 

s z 

< •-• in 
cr -J i-i 
o 

O UJ 2 

cr X < 
CL »- cr 

C5 
UJ Q O 

X z cr 

h- < Q. 



Ul 

M i 
in I- cr 

(- Ul 
-J UJ 

3 X -J 
tn H- ^^< 
UJ < 

cr I- u- 

< 
K- cr 

3 O UJ 

o z B 

UJ i-i O 

CL Z <3u 
>- Z 

I- 3 UJ 

cr X 
o in 

CK < U- 

cr 3 o 

UJ 

H- O 
Z < CL 
< X 

I- UJ 
X 
UJ UJ H- 
3 Z 
Z t-H Q 
t-« »- Z 
H 3 < 
Z O 

o cr * 
o ^ 

UJ > 

to X -J 
in K- z 

Ul O 

cr • 
CL % o 

OSS 

I- < < 

cr cr 

ao (3 

UJ o o 

Q q: cr 

UJ CL CL 
UJ w 

Z UJ 

X Q 
in h- UJ 

I-I -J 

UJ t-4 

Z CL < 

o >- u. 

»-< h- 

I- cr • 

Z -J UJ -I 

UJ -I 3 -I 

> *-* o < 
q: 3 CL o 

UJ 

I- Q UJ cr 
z z X o 
»-4 < I- cr 



o 

cr 
o 
cr 
cr 

UJ 



in 
en 

Ul 

cr 
o 

Q 

• < 

UJ "^-^ 

cr 

3 II 
< CL 



cr :tt 

UJ 

3S UJ 

O Z 

Q. I-I 

S 3 
OO 
cr cr 



a 

UJ 

cr ^^ 

UJ % 

> C3 cr 
o cr C5 
o o. z 

LU ^-"UJ 

cr CL • 











in 




















UJ 




















1- 




















1- 




















tn < 




















UJI- 


^^ 












#— * 






1- < 














tn 






Q 


V- 












h- 






< 














in 






1- UJ 


< 










UJ 






< Q 














»- 






QO 

S 


o 












UJ 






UJ 








1- 






z 






Q UJ 


1- 






>-i 






}-< 






O U 


UJ 












-1 






s z 
< 


in 






z 
o 






u. 






UJ Z 


I 












u. 






U UJ 


o 






::£ 






o 






Z h- 


H- 






U 








in 




< z 

z »-• 


►-I 
3 






a 
-J 






S 


i~ 




UJ < 


en 












< 


to CL 




1- s 


<w 






Q 






cr 


UJ o 




z 








Z 






O 


h- o 




I-I h- 


en 






< 






o 


>j 


CL 


< z 


z 












cr 


o 


O S 3 


o 






cr 






a. 


H-l Ul 


o 


o 


I-I 






UJ 




z < 




O Q. 


~j 


q: o 


J_ 




1- 


QQ 




^ s 


u 


O O 




UJ 


CL 




3 S 




CD < 


1— 1 


-J O UJ 


1- >- 


o 




O 3 




» » 


1- 


in 


CL 


o cr 




cr 


h- 


z 




oin 


in 


h- 


o 


< < 


X 


O 


Z 






LU CQ 


o 


3 q: o cr z 


o 


cr 


i-< 


UJ 




in < 


z 


a UJ in 


< i-H 


1- 


cr 


cr z 






CD 


1- H- 




X CQ 


t-4 


UJ 


CL 


H-< 




UJ 


< 


3 H- 


cr 


O 


3 






-1 




_i 


1— 1 


O y-4 


UJ 


-1 


en 


z 


1- 






I- OQ 


Q 


1 S 


> UJ < 




o 


• *-* 


1- 




in < 




h- in 


I-I 


_J I-I 


cr 




UJ CD O 




•-I z 


Q 


3 Z UJ O O 


en 


^ 


CL •-• 


UJ 




-1 UJ 


*\ 


a < 


o z UJ 




«J 


O X -1 




• • 


O 


z q: 


UJ 


1-1 CL 


o 


< 


O Z Ul 






» 


►-I h- 


cr en in 


cr 


X en i-^ 


en 






UJ 

1 


1 1 


, 


1 i 


< 

C3 




i i 


1 






T- 


o ^ 


CM 


(O ^ 


z 


in 


•^ CO CM 






*- 


o o o o o 


< 


T- 




▼- 






_l 


cr cr 


cr 


cr cr 


»- 


cr 


cr cr 


cr 










Q 


CL CL 


CL 


CL CL 


en 


en to en tn 





intDr^ootj>o^c>ico«rintDt^oocj>o^ 

t^t^t^h-t^OOOOOOOOOOOOQOOOOOOOCnCB 

cococococococococococococococococo 



.MAIN. MACYII 30A(1052) 30-MAR-78 
CZDLAG.P11 30-MAR-78 08:51 



392 






393 






394 






395 






396 






397 






398 






399 






400 






401 




000000 


402 


000000 


005706 


403 


000002 


000000 


404 


000004 


005706 


405 


000006 


000040 


406 


000010 


005706 


407 


000012 


000100 


408 


000014 


005706 


409 


000016 


000140 


410 


000020 


006014 


411 


000022 


000340 


412 


000024 


006234 


413 


000026 


000340 


414 


000030 


002766 


415 


000032 


000340 


416 


000034 


005706 


417 


000036 


000340 


418 


000040 


000042 


419 


000042 


000000 


420 




000046 


421 


000046 


005312 


422 




000165 


423 






424 






425 






426 






427 






428 






429 




177776 


430 




001176 


431 




000240 


432 




000000 


433 




100000 


434 




100000 


435 




040000 


436 




020000 


437 




01 0000 


438 




004000 


439 




002000 


440 




001000 


441 




000400 


442 




000200 


443 




000100 


444 




000040 


445 




000020 


446 




000010 


447 




000004 
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;SR11- INHIBIT ITERATION. 

;SR10- HALT AT END CURRENT TEST, TEST NO. IN DATA LIGHTS 

;SR9- SELECT ROUTINE. 

;SR7" DISABLE STALL MODE AND RUN FULL SPEED. 

;SR6 THROUGH SRO - NUMBER OF ROUTINE TO BE SELECTED. 



SiQ OOOS 



;STANDARD CONFIGURATION 




;CHARACTER LENGTH 8 




;STOP CODE 2 
.=0 
ERTP 








jUNASSIGNED TRAP 



MACHER: ERTP 




;SP OVERFLOW, BUS ERROR TRAP 


40 






ERTP 




; RESERVED INSTRUCTION TRAP 


100 






ERTP 




;TRACE TRAP 


140 






MAPVEC 




;TRAP TO MAP VECTOR 


PRTY7 






PFAIL 




; POWER FAIL TRAP 


PRTY7 






EMTINT 




;EMT TRAP 


PRTY7 






ERTP 






340 






.+2 






HALT 






.=46 






LOGIC 






.REPT 


117. 




.+2 




;TRAP TO TRAP REPORTER 



; EQUATE STATEMENTS 
PSW=177776 
SPB0T=1176 
NOP=240 
OPEN=0 

MANUAL=BIT15 
BIT15=100000 
BIT14=40000 
BIT13=20000 
BIT12=10000 
BIT11=4000 
BIT10=2000 
BIT9=1000 
BIT8=400 
BIT7=200 
BIT6=100 
BIT5=40 
BIT4=20 
BIT3=10 
BIT2»4 
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SEQ 0009 



448 




000002 


449 




000001 


450 




005726 


451 




022626 


452 




000340 


453 




000300 


454 




000240 


455 




000200 


456 




000140 


457 




000100 


458 




000040 


459 




000000 


460 




104000 


461 




104001 


462 




104002 


463 




104003 


464 




104004 


465 




104005 


466 




104006 


467 




104007 


468 




104010 


469 




104011 


470 




104012 


471 




104013 


472 




104014 


473 




104015 


474 




104016 


475 




104017 


476 




104020 


477 




177777 


478 




100000 


479 






480 






481 




000174 


482 


000174 


177570 


483 


000176 


000000 


484 




000200 


485 


000200 


000137 001640 


486 




000204 


487 


000204 


000137 006414 


488 




001200 


489 






490 






491 






492 






493 






494 






495 


001200 


175610 


496 


001202 


175620 


497 


001204 


175630 


498 


001206 


175640 


499 


001210 


175650 


500 


001212 


175660 


501 


001214 


175670 


502 


001216 


175700 


503 


001220 


175710 



BIT1=2 

BIT0=1 

P0PSP=5726 

P0PSP2=022626 

PRTY7=340 

PRTY6=300 

PRTY5=240 

PRTY4=200 

PRTY3=140 

PRTY2=100 

PRTY1=40 

PRTYO=0 

TYPE=EMT+0 

TYPES=EMT+1 

STALL=EMT+2 

ERR0R=EMT+3 

DATCHK=EMT+4 

CHALTcEMT+5 

STRXV=EMT+6 

STTXV=EMT+7 

EHALT=EMT+10 

SRESET=EMT+11 

SC0PE=EMT+12 

SAVREG=EMT+13 

RSTREG=EMT+14 

ERR0R1=EMT+15 

DELAY=EMT+16 

TIMERX=EMT+17 

TIMETX=EMT+20 

ATLAST=-1 

CD=100000 



.LIST 



ME 



;POP THE STACK. SAME AS TST (6)+ 

;POP STACK TWICE. SAME AS CMP (6)-l-.(6)4 

; PRIORITY LEVEL DEFINITIONS 



JFLAG FOR C/D TESTS 



. = 174 
SRPTR: 177570 
SOFTSR: 000000 

.=200 

UMP ®#STARTZ 

.=204 

JMP @*RESTART 

.=1200 



;G0 TO START OF PROGRAfyJ. 



JDEVICE ADDRESS LIST 

;LSB BITO IS SET TO A 1 BY MAPPER IF DEVICE NOT FOUND 

;T0 TEST THAT LINE NOT FOUND CLEAR BITO IN THAT DEVICE ADDRESS 

;IN THIS TABLE AFTER MAPPING DONE 

• HifH* *H*il,4i* it: ,f ********** 

DEVICE ADDRESS (RXCSR) 

DEVICE ADDRESS (RXCSR) 

DEVICE ADDRESS (RXCSR) 

DEVICE ADDRESS (RXCSR) 

DEVICE ADDRESS (RXCSR) 

DEVICE ADDRESS (RXCSR) 

DEVICE ADDRESS (RXCSR) 

DEVICE ADDRESS (RXCSR) 
•.LINE 10 DEVICE ADDRESS (RXCSR) 



RXCRO: 


175610 


;LINE 


RXCR1 : 


175626 


;LINE 1 


RXCR2: 


175630 


;LINE 2 


RXCR3: 


175640 


-.LINE 3 


RXCR4: 


175650 


;LINE 4 


RXCR5: 


175660 


;LINE 5 


RXCR6: 


175670 


;LINE 6 


RXCR7: 


175700 


;LINE 7 


RXCRIO: 


175710 


•.LINE 1< 
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SEQ 0010 



504 


001222 


175720 


505 


001224 


175730 


506 


001226 


175740 


507 


001230 


175750 


508 


001232 


175760 


509 


001234 


175770 


510 


001236 


176000 


511 


001240 


176010 


512 


001242 


176020 


513 


001244 


176030 


514 


001246 


176040 


515 


001250 


176050 


516 


001252 


176060 


517 


001254 


176070 


518 


001256 


176100 


519 


001260 


176110 


520 


001262 


176120 


521 


001264 


176130 


522 


001266 


176140 


523 


001270 


176150 


524 


001272 


176160 


525 


001274 


176170 


526 


001276 


177777 


527 


001300 


177777 


528 






529 






530 






531 






532 






533 






534 






535 






536 


001302 


040377 


537 


001304 


040377 


538 


001306 


040377 


539 


001310 


040377 


540 


001312 


040377 


541 


001314 


040377 


542 


001316 


040377 


543 


001320 


040377 


544 


001322 


040377 


545 


001324 


040377 


546 


001326 


040377 


547 


001330 


040377 


548 


001332 


040377 


549 


001334 


040377 


550 


001336 


040377 


551 


001340 


040377 


552 


001342 


040377 


553 


001344 


040377 


554 


001346 


040377 


555 


001350 


040377 


556 


001352 


040377 


557 


001354 


040377 


558 


001356 


040377 


559 


001360 


040377 



RXCR11 : 


175720 


HUE 


1 1 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR12: 


175730 


LINE 


12 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR13: 


175740 


LINE 


13 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR14: 


175750 


LINE 


14 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR15: 


175760 


LINE 


15 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR16: 


175770 


LINE 


16 


DEVICE 


mDDRESS 


(RXCSR) 


RXCR17: 


176000 


LINE 


17 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR20: 


176010 


LINE 


20 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR21: 


176020 


LINE 


21 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR22: 


176030 


LINE 


22 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR23: 


176040 


LINE 


23 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR24: 


176050 


LINE 


24 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR25: 


176060 


LINE 


25 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR26: 


176070 


LINE 


26 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR27: 


176100 


LINE 


27 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR30: 


176110 


LINE 


30 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR31 : 


176120 


LINE 


31 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR32: 


176130 


LINE 


32 


DEVICE 


ADDRESS 


(RXCSR). 


RXCR33: 


176140 


LINE 


33 


DEVICE 


ADDRESS 


(RXCSR)' 


RXCR34: 


176150 


LINE 


34 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR35: 


176160 


LINE 


35 


DEVICE 


ADDRESS 


(RXCSR) 


RXCR36: 


176170 


LINE 


36 


DEVICE 


ADDRESS 


(RXCSR) 


XORADD: 


177777 


LINE 


37 


SPECIAL ADDRESS FOR XOR 


RXEND: 


177777 


LINE 


XX 


DEVICE 


ADDRESS 


(RXCSR) 



CHARACTER LENGTH, PRIORITY 
INITIALLY SET FDR DL11-E. 
BIT 15 SET TO A 1 = THAT LIN 
EX: 140377 « DL11C OR DL11D, 
BITS 12-14 = PRIORITY LEVEL 
BITS 0-7 = CHARACTER MASK EX 



C/D MASK 

I0RITY=4, CHARACTER LENGTH=8 

E HAS DL11-C OR DL11-D 

PRIORITY 3 4, CHARACTER LENGTH 
THAT LINE 
. 377=8, 177=7. 77=6. 37=5 



CMASO: 


040377 


LINE 





CHARACTER 


VIASK, 


PRIORITY. 


C/D 


FLAG 


CMAS1 : 


040377 


LINE 


1 


CHARACTER 


V1ASK, 


PRIORITY, 


C/D 


FLAG 


CMAS2: 


040377 


LINE 


2 


CHARACTER 


VIASK, 


PRIORITY, 


C/D 


FLAG 


CMAS3: 


040377 


LINE 


3 


CHARACTER 


VIASK, 


PRIORITY. 


C/D 


FLAG 


CMAS4: 


040377 


LINE 


4 


CHARACTER 


VIASK, 


PRIORITY, 


C/D 


FLAG 


CMAS5: 


040377 


LINE 


5 


CHARACTER 


WASK, 


PRIORITY, 


C/D 


FLAG 


CMAS6: 


040377 


LINE 


6 


CHARACTER 


VIASK, 


PRIORITY, 


C/D 


= LAG 


CMAS7: 


040377 


LINE 


7 


CHARACTER 


VIASK, 


PRIORITY. 


C/D 


'LAG 


CMAS10 


040377 


LINE 


10 


CHARACTER 


MASK 


PRIORITY 


C/D 


FLAG 


CMAS11 


040377 


LINE 


11 


CHARACTER 


MASK 


PRIORITY 


C/D 


FLAG 


CMAS12 


040377 


LINE 


12 


CHARACTER 


MASK 


PRIORITY 


C/D 


FLAG 


CMAS13 


040377 


LINE 


13 


CHARACTER 


MASK 


PRIORITY 


C/D 


FLAG 


CMAS14 


040377 


LINE 


14 


CHARACTER 


MASK 


PRIORITY 


C/D 


FLAG 


CMAS15 


040377 


LINE 


15 


CHARACTER 


MASK 


PRIORITY 


C/D 


FLAG 


CMAS16 


040377 


LINE 


16 


CHARACTER 


MASK 


PRIORITY 


C/D 


FLAG 


CMAS17 


040377 


LINE 


17 


CHARACTER 


MASK, 


PRIORITY 


C/D 


FLAG 


CMAS20 


040377 


LINE 


20 


CHARACTER 


MASK 


PRIORITY 


C/D 


FLAG 


CMAS21 


040377 


LINE 


21 


CHARACTER 


MASK, 


PRIORITY 


C/D 


FLAG 


CMAS22 


040377 


LINE 


22 


CHARACTER 


MASK, 


PRIORITY 


C/D 


FLAG 


CMAS23 


040377 


LINE 


23 


CHARACTER 


MASK. 


PRIORITY 


C/D 


FLAG 


CMAS24 


040377 


LINE 


24 


CHARACTER 


MASK, 


PRIORITY 


C/D 


FLAG 


CMAS25 


040377 


LINE 


25 


CHARACTER 


MASK, 


PRIORITY 


C/D 


FLAG 


CMAS26 


040377 


LINE 


26 


CHARACTER 


MASK, 


PRIORITY 


C/D 


FLAG 


CMAS27 


040377 


LINE 


27 


CHARACTER 


MASK, 


PRIORITY 


C/D 


FUG 
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SE(9 0011 



560 


001362 


040377 


561 


001364 


040377 


562 


001366 


040377 


563 


001370 


040377 


564 


001372 


040377 


565 


001374 


040377 


566 


001376 


040377 


567 


001400 


040377 


568 






569 


001402 


000000 


570 


001404 


000000 


571 


001406 


177740 


572 






573 


001410 


000000 


574 


001412 


000000 


575 


001414 


000000 


576 


001416 


000000 


577 


001420 


000000 


578 


001422 


000000 


579 


001424 


000000 


580 


001426 


000000 


581 






582 






583 


001430 


177560 


584 


001432 


177562 


585 


001434 


177564 


586 


001436 


177566 


587 


001440 


000060 


588 


001442 


000200 


589 


001444 


000064 


590 


001446 


000200 


591 


001450 


000000 


592 


001452 


000000 


593 


001454 


000000 


594 


001456 


000000 


595 


001460 


000000 


596 


001462 


000000 


597 


001464 


000000 


598 


001466 


000000 


599 


001470 


000000 


600 


001472 


000000 


601 


001474 


006446 


602 


001476 


014522 


603 


001500 


014574 


604 


001502 


014672 


605 


001504 


014732 


606 


001506 


005110 


607 


001510 


005110 


608 


001512 


005110 


609 


001514 


003342 


610 


001516 


003464 


611 


001520 


003774 


612 


001522 


005516 


613 


001524 


005424 


614 


00152S 


000000 


615 


001 S30 


003120 



CMAS30: 


040377 


CMAS31: 


040377 


CMAS32: 


040377 


CMAS33: 


040377 


CMAS34: 


040377 


CMAS35: 


040377 


CMAS36: 


040377 


CMAS37: 


040377 


UMASK: 





RMASK: 





STLMSK: 


177740 


RXCSR: 





rxbuf: 





TXCSR: 





TXBUF: 





RXVTR: 





RXLVL: 





Txvtr: 





TXLVL: 







^^:t^^^*i), 


TKS: 


177560 


TKB: 


177562 


TPS: 


177564 


TPB: 


177566 


TKVTR: 


60 


TKLVL: 


PRTY4 


TPVTR: 


64 


TPLVL: 


PRTY4 


prgnum: 


OPEN 


kstart: 


OPEN 


CURTST: 


OPEN 


rtnno: 


OPEN 


TNNO: 





nxtst: 


OPEN 


ICTR: 


OPEN 


SCOPTR: 


OPEN 


OLDPS: 





FMAP: 





PRGTAB: 


PRGO 




PRG1 




PRG2 




PRG3 




PRG4 




INCRPG 




INCRPG 




INCRPG 


ERITTAB: 


TYP 




TYPS 




STAL 




ERR 




dtchk 




OPEN 




STLSRV 



;LINE 30 CHARACTER MASK, 

;LINE 31 CHARACTER MASK, 

;LINE 32 CHARACTER MASK, 

JLINE 33 CHARACTER MASK. 

;LINE 34 CHARACTER MASK, 

JLINE 35 CHARACTER MASK, 

JLINE 36 CHARACTER MASK, 

;LINE 37 SPECIAL ADDRESS 



PRIORITY, 
PRIORITY, 
PRIORITY, 
PRIORITY, 



C/D FLAG 
C/D FLAG 
C/D FLAG 
C/D FLAG 



PRIORITY, C/D FLAG 

PRIORITY, C/D FLAG 

PRIORITY, C/D FLAG 
FOR XOR 



;MASK FOR DEVICE UT 

;MASK FOR CHAR LENGTH FOR DEVICE UT 

;MASK FOR MAX RANDOM STALL 

; RECEIVER UNDER TEST 
; RECEIVER BUFFER UNDER TEST 
; TRANSMITTER CSR UNDER TEST 
; TRANSMITTER BUFFER UNDER TEST 
; RECEIVER VECTOR UNDER TEST 
; RECEIVER PRIORITY LEVEL UT 
TRANSMITTER VECTOR UNDER TEST 
;TRANSMITTER PRIORITY LEVEL UT 



LSR CSR 

LSR BUFFER 

LSP CSR 

LSP BUFFER 

LSR INTERRUPT VECTOR 

LSR PRIORITY LEVEL 

LSP INTERRUPT VECTOR 

LSP PRIORITY LEVEL 

CONTAINS CURRENT PROGRAM*!' 

CURRENT PROGRAM START ADDRESS. 

CONTAINS ADDR OF CURRENT TEST. 

CONTAINS CURRENT TEST #. 

CONTAINES EDITED TNUM 

CONTAINS ADDR OF NEXT TEST. 

CONTAINS CURRENT ITERATION COUNT 

CONTAINS CURRENT SCOPE POINTER. 

PS SAVED FROM TRAP TO EMT ROUTINE 

MAPPING FLAG, 1= MAPPING IN PROGRESS 

PRGO START ADDRESS 

PRG1 START ADDRESS 

PRG2 START ADDRESS 

PRG3 START ADDRESS 

PRG4 ST,->RT ADDRESS 

INCORRECT PROGRAM SELECTED 



; POINTER TO TYPEOUT ROUTINE 

; POINTER TO CHAINED MESSAGES ROUTINE 

; POINTER TO RANDOM STALL ROUTINE 

; POINTER TO ERROR ROUTINE 
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STLSPV 

; POINTER TO ERROR HALT ROUTINE. 



616 


001532 


003154 






STLSPV 




617 


001534 


005362 






EHLT 




618 


001536 


003210 






SRSETT 




619 


001540 


002540 






CHAINN 




620 


001542 


003020 






SAVRG 




621 


001544 


003060 






RSTRG 




622 


001546 


005540 






ERR1 




623 


001550 


003726 






DLY 




624 


001552 


004044 






TMRX 




625 


001554 


004054 






TMTX 




626 








; 






627 


001556 


000000 




CRBUF: 


OPEN 




628 


001560 


000000 




CRBUFA: 


OPEN 




629 


001562 


000000 




crbufb: 


OPEN 




630 


001564 


000000 




giro: 


OPEN 




631 


001566 


000000 




CTR1 : 


OPEN 




632 


001570 


000000 




CTR2: 


OPEN 




633 


001572 


000000 




CTR3: 


OPEN 




634 


001574 


000000 




CTR4: 


OPEN 




635 


001576 


000000 




CTR5: 


OPEN 




636 


001600 


000000 




CTR6: 


OPEN 




637 


001602 


000000 




CTR7: 


OPEN 




638 


001604 


000000 




TXCSRT: 


OPEN 




639 


001606 


000000 




RXCSRT: 


OPEN 




640 


001610 


000000 




RXBUFT: 


OPEN 




641 


001612 


000000 




FOUNDV: 







642 


001614 


000000 




LINENO: 







643 


001616 


000000 




TEMP: 


OPEN 




644 


001620 


000000 




TEP^Pi: 







645 


001622 


000000 




TEMP2: 







646 


001624 


000000 




COUNT: 







647 


001626 


000000 




ftitle: 







648 


001630 


000000 




FNONE: 







649 


001632 


000000 




TOPC: 







650 


001634 


000000 




FROMPC: 







651 


001636 


000000 




PASCNT: 







652 


001640 


012706 


001176 


STARTZ: 


MOV 


#SPB0T,%6 


653 


001644 


013746 


000006 




MOV 


6,-(SP) 


654 


001650 


013746 


000004 




MOV 


4,-(SP) 


655 


001654 


012737 


001670 000004 




MOV 


#1$,4 


656 


001662 


005777 


176306 




TST 


©SRPTR 


657 














658 


001666 


000404 






BR 


2$ 


659 


001670 


012737 


000176 000174 


1$: 


MOV 


#SOFTSR,SRPTR 


660 














661 


001676 


022626 






CMP 


(6)+,(6)+ 


662 


001700 


012637 


000004 


2$: 


MOV 


(6)+, 4 


663 


001704 


012637 


000006 




MOV 


(6)+, 6 


664 


001710 


005037 


001626 




CLR 


@#FTITLE 


565 


001714 


013746 


000004 




MOV 


®'#4,-(%6) 


666 


001720 


012737 


002020 000004 




MOV 


#X0RA,@>#4 


667 


001726 


005737 


177060 




TST 


f»# 177060 


668 


001732 


012637 


000004 




MOV 


(%6)+,@#4 


669 


001736 


012737 


174000 001276 




MOV 


#1 74000, @«XORADD 


670 


001744 


012737 


177777 002016 




MOV 


#-1.@#XDRFLG 


671 


001752 


104000 






TYPE 





;SAVE CURRENT VECTOR 



;SET UP TIME OUT VECTOR 

;TRY TO REFERENCE THE 

{HARDWARE SWITCH REGISTER 

; BRANCH IF NO TIME OUT TRAP OCCURRS 

; CHANGE THE SWITCH REGISTER POINTER 

;T0 POINT TO A SOFTWARE SWITCH REGISTER 

; RESTORE THE STACK 

; RESTORE TIME OUT VECTOR 
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672 001754 001762 MESS1 

673 001756 000137 002044 dMP ®#START 

674 001762 005015 047531 020125 MESSl : .ASCII <15><12>«Y0U ARE ON AN XOR TESTER©' 

675 001770 051101 020105 047117 

676 001776 040440 020116 047530 

677 002004 020122 042524 052123 

678 002012 051105 100 

679 002016 .EVEN 

680 002016 000000 XORFLG: .WORD 
681 

682 002020 022626 XORA: CMP (%6)+,(%6)+ 

683 002022 012637 000004 MOV (%6)+,i>#4 

684 002026 012737 177777 001276 MOV #-1 ,@#XORADD 

685 002034 005037 002016 CLR ©iS'XORFLG 

686 002040 000137 002044 UMP @#START 
687 

688 

689 .MACR TSTAA AX,B,C,D,E 

690 ;*********♦****«*******«******♦♦*♦**♦♦*****************«****♦«*♦*« 

691 AT'E': C ;TEST NUMBER * 

692 AT'D' ; ADDRESS OF NEXT TEST * 

693 B ; ITERATION COUNT « 

694 'AX 'A ; SCOPE ENTRY POINT * 

695 X=X+1 ; # 

696 ;*****♦**♦*♦**♦♦****♦****♦***♦♦*****♦««******♦*«♦*«****♦»*♦«*«***»*»**«*«♦♦* 

697 .ENDM 

698 .MACR TSTA B.AX.Z 

699 TSTAA AX,B,\X+1+Z,\X+2,\X-I-1 

700 .ENDM 
701 

702 002044 012706 001176 START: MOV #SPB0T,%6 ;SET BOTTOM OF SP STACK. 

703 002050 012737 006234 00002** MOV #PFAIL,24 

704 002056 005037 001612 CLR FOUNDV 

705 002062 005037 001472 CLR FMAP 

706 002066 004737 003300 USR %7,CLRCD JCLEAR DEVICE UT PARAMETERS 

707 002072 004737 003516 JSR %7,0VRLAY {OVERLAY TRAP AREA 

708 002076 005737 001626 TST FTITLE jTITLE PRINTED AND MAP MADE 

709 002102 001054 BNE START1 {YES, SKIP OVER THIS 

710 002104 104000 TYPE 

711 002106 015044 MTIT 

712 002110 005237 001626 INC FTITLE 

713 002114 005037 001630 CLR FNONE {CLEAR DEVICE PRESENT FLAG 

714 002120 012737 002160 000004 MOV #MAPNE,MACHER {SET UP NO DEVICE PRESENT RETURN 

715 002126 012704 001200 MOV #RXCR0,%4 {SET UP DEVICE POINTER 

716 002132 021437 001300 MAPA: CMP (%4) ,##RXEND {LAST DEVICE 

717 002136 001430 BEQ MAPEND {YES, EXIT 

718 002140 042714 000001 BIC #BIT0,(4) {CLEAR ODD ADDRESS 

719 002144 005037 177776 CLR PSW 

720 002150 005774 000000 TST @(4) {TEST DEVICE 

721 002154 000240 NOP 

722 002156 000404 BR MAPOK 

723 002160 052724 000001 MAPNE: BIS #BIT0,(4)+ {NOT LIVING 

724 002164 022626 P0PSP2 

725 002166 000761 BR MAPA 

726 002170 012437 001620 MAPOK: MOV (4)+, TEMPI {SAVE DEVICE ADDRESS FOR TYPING 

727 002174 004537 004474 USR %5,0ACNV 
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SEQ 0014 



728 
729 
730 
731 
732 
733 
734 
735 
736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
765 
766 
767 
768 
769 
770 
771 
772 
773 
774 
775 
776 
777 
778 
779 
780 
781 
782 
783 



002200 
002202 
002204 
002206 
002210 
002212 
002216 
002220 
002226 
002232 
002234 
002240 
002244 
002246 
002252 
002260 
002264 
002266 
002272 
002274 
002276 
002302 
002304 
002306 
002310 
002314 
002316 
002322 
002326 
002330 
002334 
002342 
002346 
002352 
002354 
002356 
002362 
002364 
002370 
C02374 
002376 

002402 
002410 
002416 
002424 
002430 
002434 
002436 
002442 
002446 
002454 
002456 
002462 
002464 
002470 



001620 
015135 
000006 
104000 
015135 
005237 
000745 
012737 
005737 
001424 
012701 
032711 
001013 
010137 
162737 
006237 
01 1101 
004737 
000420 
005721 
020127 
001356 
104000 
015211 
005737 
001402 
000137 
005037 
000000 
000137 
012737 
005037 
005037 
104000 
015155 
004737 
012600 
042700 
010037 
006300 
000170 

013737 
012737 
012737 
005037 
012706 
104011 
005037 
004737 
032777 
001011 
005737 
100003 
005737 
100364 



005706 
001630 

001200 
000001 

001614 
001200 
001614 



005302 
001626 

002044 
000001 
177776 
001456 



177770 
001450 

001474 

001452 
005706 
000040 
001472 
001176 

177776 
002734 
001000 

001402 

001456 



TEMPI 

MDEVAD 

6 

TYPE 

MDEVAD 

INC 

BR 

000004 MAPEND: MOV 
TST 
BEO 
START l: MOV 
START2: BIT 
BNE 
MOV 

001614 SUB 

ASR 
MOV 
JSR 
BR 
STARTS: TST 
CMP 
BNE 

maperr: type 

MNONE 

TST 

BEQ 

JMP 

CLR 

HALT 

JMP 

MOV 

CLR 

CLR 

TYPE 

PGMSG 

JSR 

MOV 

BIC 

MOV 

ASL 

JMP 



001636 START4; 



001462 
000004 
000006 



GETRDY: MOV 
GTRDYX: MOV 
MOV 
CLR 
MOV 
SRESET 

GTRDYA: JSR 
BIT 
BNE 
TST 
BPL 
TST 
BPL 



FNONE 

MAPA 

#ERTP,MACHER 

FNONE 

MAPERR 

#RXCR0,%1 

#BIT0,(1 ) 

START3 

%1 .LINENO 

#RXCRO,LINENO 

LINENO 

(1).%1 

%7,F0RMAD 

START4 

(1) + 

%1 ,#RXEND 

START2 



®#42 
.+6 

PRGXTL 
FTITLE 

START 

#1 .PASCNT 

PSW 

RTNNO 



PC.RDOCT 

(SP)-l-,%0 

#177770, %0 

%0,PRGNUM 

%0 

PPRGTAB(O) 

KSTART.NXTST 

#ERTP,MACHER 

#40,MACHER+2 

FMAP 

#SPB0T,%6 

PSW 

%7,F0RWD 

#BIT9,@SRPTR 

GTRDYC 

UMASK 

GTRDA1 

RTNNO 

GTRDYA 



;SET HAVE DEVICE 

; RESET TRAPS 

;ANY DEVICES PRESENT 

;N0, ERROR 

;IS DEVICE LIVING 

;N0, CHECK FOR END 

; CALCULATE LINE NUMBER UNDEa 



;YES, LOAD AND EXIT 



;END OF TABLE 
;N0, LOOP 



;MONITOR LOAD 
•,N0, CONTINUE 
;YES, EXIT 



;CALL FOR PROGRAM NUMBER. 

;READ IN PROGRAM NUMBER. 

; INPUT DATA TO RO 
; LIMIT (SR) TO BITS 3-0 
;SAVE PROGRAM ft 

;G0 TO SELECTED PROGRAM. 

;ADDR OF 1ST ROUTINE TO NXTST 
; RESET MACHER TRAP. 



;SET BOTTOM OF STACK. 
; ISSUE RESET. 

;ROLL FORWARD TO "NEXT" ROUTINE. 

; CHECK SELECT ROUTINE SWITCH 

; BRANCH IF SELECT ROUTINE SWITCH IS SET. 

;C/D DEVICE 

;N0, CONTINUE 

;THIS A C/D TEST 

;N0, DO NEXT TEST 
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SEQ 001 S 



784 

785 

786 

787 

788 

789 

790 

791 

792 

793 

794 

795 

796 

797 

798 

799 

800 

801 

802 

803 

804 

805 

806 

807 

808 

809 

810 

811 

812 

813 

814 

815 

816 

817 

818 

819 

820 

821 

822 

823 

824 

825 

826 

827 

828 

829 

830 

831 

832 

833 

834 

835 

836 

837 

838 

839 



002472 
002476 
002500 
002504 
002510 
002514 
002516 
002522 
002530 
002532 
002536 

002540 
002546 
002550 
002554 
002556 
002562 
002564 
002570 
002576 
002602 
002606 
002614 
002616 
002622 
002624 
002626 
002634 
002636 
002642 
002646 
002650 
002656 
002660 
002666 
002670 
002674 

002676 
002700 
002704 



000177 
000464 
017700 
042700 
123700 
001002 
000177 
022737 
001344 
004737 
000721 

032777 
001403 
013716 
000002 
005737 
100011 
013746 
012737 
005737 
012637 
032777 
001003 
005337 
001352 
022626 
032777 
001405 
013700 
042700 
000000 
032777 
001251 
022737 
001250 
004737 
000642 

022626 
012637 
000721 



175470 
177600 
001456 

176732 
177777 

005100 



040000 

001466 

002016 

000004 
002676 
177060 
000004 
004000 

001464 



001456 
100000 

001000 

177777 

005122 



GTRDAi: JMP 
BR 

GTRDYC : MOV 
BIC 
CMPB 
BNE 
JMP 
001462 GTRDYD: CMP 
BNE 
JSR 
BR 

175426 CHAINN: BIT 
BEQ 
CHNAB: MOV 
RTI 
CHNA: TST 
BPL 
MOV 

000004 MOV 

TST 
MOV 

175360 1$: BIT 
BNE 
DEC 
BNE 

P0PSP2 
BIT 
BEQ 
MOV 
BIC 
HALT 
BIT 
BNE 
CMP 
BNE 
JSR 
BR 

CMP 
MOV 
BR 



002000 175340 



175316 CHNB: 



@CURTST 

CHNB 

@SRPTR,%0 

#177600, %0 

RTNNO, %0 

GTRDYD 

@CURTST 

#-1 , NXTST 

GTRDYA 

%7,INCRTN 

GETRDY 

#BIT14,®SRPTR 

CHNA 

SC0PTR,@%6 

®>#XORFLG 

1$ 

@#4,-(%6) 

#X0R,@#4 

@#1 77060 

(%6)+,®#4 

#BIT11 ,#SRPTR 

CHNAA 

ICTR 

CHNAB 

#BIT10,@SRPTR 
CHNB 
RTNNO, %0 
#BIT15,%0 

#BIT9,#SRPTR 

GETRDY 

#-1 .NXTST 

GTRDYX 

%7,PRGEND 

GETRDY 

(%6)+,(%6)+ 

(%6)+,®#4 

CHNAB 



;G0 RUN CURRENT ROUTINE. 
;N0 GO. MANUAL RTN BYPASSED. 

;(SR) TO RO 
;MASK UNDESIRED BITS 
; COMPARE RTNNO TO (RO) 
; BRANCH IF ROUTINE NOT FOUND YET. 
;G0 RUN ROUTINE. 
;N0. CHECK FOR LAST ROUTINE. 
; BRANCH IF NOT LAST ROUTINE. 
;YES. INCORRECT ROUTINE SELECTED. 
;START OVER. 

; CHECK FOR SCOPE OPTION. 

; BRANCH IF SCOPE SW NOT SET. 

;SET UP TO RETURN TO ROUTINE. 

;RETURN TO ROUTINE. 



;TEST FOR XOR 

;TEST INHIBIT ITERATION SWITCH 

; BRANCH IF INHIBIT ITERATION SW SET. 

; DECREMENT ITERATION COUNT. 

; BRANCH 'F COUNT NOT 0. 

;POP STACK TWICE 



; CHECK SELECT ROUTINE SWITCH 
; BRANCH IF SELECT RTN SW SET 
;LAST TEST? 

•.BRANCH IF NOT LAST TEST. 
; PROGRAM END. 



005737 001402 
100007 



002706 
002712 

002714 052777 

002722 104016 

002724 002734 

002726 005777 

002732 000207 



002734 013705 001462 
002740 012537 001456 



INIT FOR C/D - WITHOUT JUMPER RESET STARTS ASSEMBLING CHARACTER SETTING DONE 
SET MAINT, DELAY, CLEAR RX DONE 



000004 176472 



TST 

BPL 

BIS 

DELAY 

1500. 

TST 

RTS 



MOV 
MOV 



UMASK 
CDINX 
#BIT2,®TXCSR 



S>RXBUF 
%1 



NXTST, %5 
(5)+, RTNNO 



;C-D DEVICE 
;N0, EXIT 
;SET MAINT BIT 
JWAIT 1 .5 SEC 

; CLEAR RX DONE 



JADDR OF NEXT ROUTINE TO RS. 
;GET NEXT ROUTINE NUMBER. 
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SEQ 0013 



840 
841 
842 
843 
844 
845 
846 
847 
848 
849 
850 
851 
852 
853 
854 
855 
856 
857 
858 
859 
860 
861 
862 
863 
864 
865 
866 
867 
868 
869 
870 
871 
872 
873 
874 
875 
876 
877 
878 
879 
880 
881 
882 
883 
884 
885 
886 
887 
888 
889 
890 
891 
892 
893 
894 
895 



002744 
002750 
002754 
002760 
002764 

002766 
002770 
002774 
003000 
003002 
003006 
003012 
003016 



003020 
003024 
003030 
003032 
003034 
003036 
003040 
003042 
003046 
003052 
003054 
003056 



003060 
003064 
003070 
003072 
003074 
003076 
003100 
003102 
003106 
0031 12 
003114 
0031 16 



003120 
003124 
003132 
003136 
003142 
003146 
003152 



012537 001462 

012537 001464 

012537 001466 

010537 001454 
000207 



01 1646 
162716 
017616 
006316 
042716 
062716 
017616 
000136 



012637 
012637 
010446 
010346 
010246 
010146 
01 0046 
013746 
013746 
000002 
000000 
000000 



012637 
012637 
01 2600 
012601 
012602 
012603 
012604 
013746 
013746 
000002 
000000 
000000 



004737 
017637 
062716 
013701 
012721 
013721 
000002 



000002 
000000 

177001 
001514 
000000 



003056 



003056 
003054 



003114 
003116 



003116 
003114 



006270 
000000 
000002 
001420 
000000 
001422 



MOV 
MOV 
MOV 
MOV 
RTS 

EMTINT: MOV 
SUB 
MOV 

emta: ASL 

BIG 
ADD 
MOV 
UMP 



(5)4-,NXTST 

(5)+,ICTR 

(5)-l-,SC0PTR 

%5,CURTST 

%7 

@%6,-{6) 
i^2,®»%6 
P(6),@%6 
@%6 

#177001 ,@%6 
#EMTTAB,@%6 
@(6),@%6 
@{6) + 



SAVE REGS TO 4 SUBROUTINE. 



SAVRG: MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 
SVRPC: OPEN 
SVRPSW: OPEN 



(6)+, SVRPC 
(6)+, SVRPSW 
%4,-{6) 
%3,-(6) 
%2,-(6) 
%1,-(6) 
%0,-(6) 
SVRPSW, -(e) 
SVRPC, -(6) 



;GET ADDR OF NEXT "NEXT'' ROUTINE. 
jGET ITERATION COUNT. 
•,GET SCOPE LOOP ENTRY POINTER. 
;ADDR OF NOW CURRENT TEST TO CURTST. 
;EXIT FORWD SUBROUTINE. 

;GET SAVED PC. 

; DECREMENT PC BY 2. 

;EMT ARG X 2. 
; REMOVE 7 MSB. 
;FORM EMT RTN ADDR. 

;G0 TO EMT ROUTINE. 



;SAVE PC AND PSW. 



;SAVE REGS 0-4 
;IN STACK. 



; RESTORE PC AND PSW. 
;EXIT. 



RESTORE REGS TO 4 SUBROUTINE. 



(6)+,RSTPC 

(6)+,RSTPSW 

(6)+,%0 

(6)+,%1 

(6)+,%2 

(6)+,%3 

(6)+,%4 

RSTPSW,-(6) 

RSTPC,-(6) 



•,SAVE PC AND PSW. 



; RESTORE REGS 
;FROM STACK. 



; RESTORE PC AND PSW. 
;EXIT 



003154 004737 006270 



RSTRG: MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

RTI 

RSTPC: OPEN 
RSTPSW: OPEN 

;ROUTINE TO SET RECEIVER INTERRUPT VECTOR AND PRIORITY 

STLSRV: JSR %7,TSTVEC 

MOV @(6),STPRA+2 ;MOVE VECTOR ADDR TO STPRA+2 

ADD #2,@%6 ;SET UP EXIT 

MOV RXVTR,%1 

STPRA: MOV #0PEN,{1)+ ;SET VECTOR ADDRESS 

MOV RXLVL,{1)+ ;SET PRIORITY 

RTI ;EXIT 

•ROUTINE TO SET TRANSMITTER INTERRUPT VECTOR AND PRIORITY. 
STLSPV: USR %7,TSTVEC 
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SEO 0017 



896 
897 
898 
699 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
910 
911 
912 
913 
914 
915 
916 
917 
918 
919 
920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
930 
931 
932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 
945 
946 
947 
948 
949 
950 
951 



003160 
003166 
003172 
003176 
003202 
003206 



003210 
003214 
003216 
003222 
003224 



003226 
003232 
003234 
003236 
003242 
003246 
003250 
003252 
003256 
003260 
003262 
003266 
003272 
003274 
003276 



003300 
003304 
003310 
003314 
003320 
003324 
003330 
003334 
003340 



003342 
003344 
003350 
003352 
003356 
003364 
003366 
003370 
003376 
003400 
003406 
003410 
003414 



017637 
062716 
013701 
012721 
013721 
000002 



012700 
005100 
010037 
000005 
000002 



013700 
006100 
006100 
063700 
010037 
006100 
006100 
063700 
006100 
006100 
010037 
013700 
000207 
001233 
007622 



005037 
005037 
005037 
005037 
005037 
005037 
005037 
005037 
000207 



01 1600 
062716 
01 1000 
112037 
122737 
001001 
000002 
122737 
001416 
122737 
001417 
004737 
000756 



000000 
000002 
001424 
000000 
001426 



052525 
003212 



003276 
003274 



003276 
003274 



001416 
001414 
001410 
001412 
001420 
001424 
001422 
001426 



003462 
000100 



000045 
000043 
003416 



MOV 
ADD 
MOV 
STPPA: MOV 
MOV 
RTI 



®(6),STPPA+2 
#2,@%6 
TXVTR,%1 
^OPEN.d ) + 
TXLVL,(1)+ 



;ROUTINE TO ISSUE RESET. 



SRSETT: MOV 
COM 
MOV 
RESET 
RTI 



#52525, %0 

%0 

%0,SRSETT+2 



;MOVE VECTOR ADDR TO STPPA-l-2 
;SET UP EXIT 

;SET VECTOR ADDRESS. 
;SET PRIORITY 
;EXIT. 



;DATA TO RO. 
;COMPLEMENT (RO). 
;(R0) TO SRSETT+2. 
; ISSUE RESET. (RO) IS 
;DISPLAYED. EXIT. 



jRANDOM NUMBER GENERATOR. ROUTINE EXITS WITH NUMBER IN REGISTER 0. 



RP1 : 
RP2: 



MOV 

ROL 

ROL 

ADD 

MOV 

ROL 

ROL 

ADD 

ROL 

ROL 

MOV 

MOV 

RTS 

1233 

7622 



RP1 ,%0 

%0 

%0 

RP2,%0 

%0,RP1 

%0 

%0 

RP2,%0 

%0 

%0 

%0,RP2 

RP1 ,%0 

%7 



;EXIT. NUMBER IN RO 



;CLRCD - CLEAR CURRENT DEVICE PARAMETERS 



CLR 
CLR 
CLR 
CLR 
CLR 
CLR 
CLR 
CLR 
RTS 



TXBUF 
TXCSR 
RXCSR 
RXBUF 
RXVTR 
TXVTR 
RXLVL 
TXLVL 
%7 



;SUBROUTINE TO OUTPUT ASCII MESSAGE ON TELETYPE PRINTER. 



003462 TYPC: 



MOV 

ADD 

MOV 

MOVB 

CMPB 

BNE 

RTI 

CMPB 

BEO 

CMPB 

BEQ 

JSR 

BR 



®%6,%0 

#2,@%6 

#%0,%0 

(0)+,TYPDAT 

#100,TYPDAT 

TYPC 

#45,TYPDAT 

TYPF 

#43,TYPDAT 

TYPG 

%7,TYPD 

TYPA 



GET ADDRESS THAT CONTAINS MESSAGE ADDRESS. 

SET UP EXIT. 

ADDRESS OF MESSAGE TO RO. 

GET CHARACTER 

CHECK FOR''®"CHARACTER 

BRANCH IF NOT"@". 

TERMINATOR CHAR, DONE. EXIT. 

CHECK FOR"%". 

BRANCH IF"%" 

NOT»%". CHECK FOR"#». 

BRANCH IF »#" 

TYPE CHAR IN TYPDAT 
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SEQ 001 S 



952 


003416 


113777 


003462 


176012 TYPD: 


MOVB 


TYPDAT, §TPB 


953 


003424 


105777 


176004 




TSTB 


@TPS 


954 


003430 


100375 






BPL 


.-4 


955 


003432 


000207 






RTS 


%7 


956 


003434 


112737 


000015 


003462 TYPF: 


MOVB 


#15, TYPDAT 


957 


003442 


004737 


003416 




USR 


%7,TYPD 


958 


003446 


112737 


000012 


003462 TYPG: 


MOVB 


#12, TYPDAT 


959 


003454 


004737 


003416 




JSR 


%7,TYPD 


960 


003460 


000734 






BR 


TYPA 


961 


003462 


000000 




TYPDAT 


: OPEN 




962 








; 






963 








JSUBROUTINE TO 


OUTPUT A SERIES 


964 


003464 


01 1600 




TYPS: 


MOV 


@%6,%0 


965 


003466 


062716 


000002 




ADD 


#2,©%6 


966 


003472 


01 1037 


003512 




MOV 


fJfiO, TYPSB 


967 


003476 


022737 


177777 


003512 


CMP 


#-1, TYPSB 


968 


003504 


001001 






BNE 


TYPSA 


969 


003506 


000002 






RTI 




970 


003510 


104000 




typsa: 


TYPE 




971 


003512 


000000 




typsb: 


OPEN 




972 
973 


003514 


000763 






BR 


TYPS 


974 








•OVERLAY VECTOR AREA 


975 


003516 


012701 


000300 


OVRLAY 


MOV 


#300, %1 


976 


003522 


012702 


000302 




MOV 


#302, %2 


977 


003526 


012703 


000004 




MOV 


#4,%3 


978 


003532 


010221 




OVRLYA 


MOV 


%2,(1)+ 


979 


003534 


010321 






MOV 


%3,{1 )+ 


980 


003536 


062702 


000004 




ADD 


#4,%2 


981 


003542 


020127 


001000 




CMP 


%1 ,#1000 


982 


003546 


001401 






BEO 


OVRLYB 


983 


003550 


000770 






BR 


OVRLYA 


984 


003552 


000207 




ovrlyb: 


RTS 


7 


985 














986 








JSUBROUTINE TO 


READ OCTAL DATA 


987 


003554 


01 1646 




RDOCT: 


MOV 


(SP),-(SP) 


988 


003556 


010046 






MOV 


%0,-(SP) 


989 


003560 


010146 






MOV 


%1 ,-(SP) 


990 


003562 


005001 




indat: 


CLR 


%1 


991 


003564 


005037 


001624 




CLR 


COUNT 


992 


003570 


105777 


175634 


RDDAT: 


TSTB 


@TKS 


993 


003574 


100375 






BPL 


RDDAT 


994 


003576 


117746 


175630 




MOVB 


i>TKB,-(SP) 


995 


003602 


042716 


177600 




BIC 


#177600, (SP) 


996 


003606 


105777 


175622 


ECDAT: 


TSTB 


@TPS 


997 


003612 


100375 






BPL 


ECDAT 


998 


003614 


111677 


175616 




MOVB 


(SP),@TPB 


999 


003620 


122716 


000015 




CMPB 


#15, (SP) 


1000 


003624 


001432 






BEO 


RETRN 


1001 


003626 


122716 


000177 




CMPB 


#177, (SP) 


1002 


003632 


001423 






BEQ 


RREAD 


1003 


003634 


122716 


000060 




CMPB 


#60, (SP) 


1004 


003640 


003020 






BGT 


RREAD 


1005 


003642 


122716 


000067 




CMPB 


#67, (SP) 


1006 


003646 


002415 






BLT 


RREAD 


1007 


003650 


005237 


001624 




INC 


COUNT 



;OUTPUT CHARACTER TO PRINTER 
JWAIT FOR DONE FLAG. 

;EXIT 

;MOVE CARRIAGE RETURN CODE TO TYPDAT 

;G0 TYPE CHAR. 

;MOVE LF CODE TO TYPDAT. 

;G0 TYPE CHAR. 



SERIES OF ASCII MESSAGES ON TELETYPE PRINTER 

;GET ADDRESS THAT CONTAINS MESSAGE ADDRESS 

; UPDATE TO NEXT MESSAGE ADDRESS 

; ADDRESS OF MESSAGE TO TYPSB 

; CHECK FOR TERMINATOR 

; BRANCH IF NOT TERMINATOR. 

JTERMINATOR, EXIT 

;CALL ON TYP SUB TO TYPE MESSAGE 

; ADDRESS OF MESSAGE GOES HERE 

;G0 PROCESS NEXT MESSAGE 



■,GET DL11-E VECTOR BASE ADDRESS 
;LOAD VECTOR WITH lOT ERROR TRAP 
;ALL VECTORS BEEN LOADED 

;EXIT 

FROM THE TELETYPE PRINTER 
JMAKE ROOM FOR DATA WORD 
;SAVE RO 
;SAVE R1 

; CLEAR DATA WORD 
;SET NO. OF DIGITS = 
;TEST TTY READ STATUS 
;WAIT 
;PUSH DIGIT ON STACK 

; ;++G 

;TEST TTY PRINT STATUS 

;WAIT 

;ECHO CHARACTER 

; IS IT A TERMINATOR? 

;BR IF YES 

; IS IT A RUBOUT? 

;BR IF YES 

;IS IT AN OCTAL DIGIT? 

;BR IF NO 

;TEST AGAIN 

;BR IF NO 

;INC NO. OF DIGITS 
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SEQ 0019 



1008 


003654 


022737 


000007 001624 


CMP 


#7, COUNT 


;MORE THAN SIX DIGITS? ; J-H-G 


1009 


003662 


003407 






BLE 


RREAD 


;BR IF YES 


1010 


003654 


006301 






ASL 


%1 


; CLEAR LOWEST THREE BITS 


1011 


003666 


006301 






ASL 


%1 


;0F DATA WORD 


1012 


003670 


006301 






ASL 


%1 




1013 


003672 


162716 


000060 




SUB 


#60, (SP) 


•.CONVERT TO BINARY 


1014 


003676 


062601 






ADD 


(SP)+,%1 


;ADD DIGIT TO DATA WORD 


1015 


003700 


000733 






BR 


RDDAT 


JGET NEXT DIGIT 


1016 


003702 


104000 




RREAD: 


TYPE 




;TELL USER ABOUT ILLEGAL CHARACTER 


1017 


003704 


017253 






DTERR 






1018 


003706 


005726 






TST 


(SP)-f 


;GET RID OF ILLEGAL CHARACTER 


1019 


003710 


000724 






BR 


INDAT 


JSTART SUBROUTINE AGAIN 


1020 


003712 


010166 


000010 


RETRN: 


MOV 


%1 ,10(SP) 


; STORE DATA WORD ON STACK 


1021 


003716 


005726 






TST 


(SP) + 


;INC STACK POINTER 


1022 


003720 


012601 






MOV 


(SP)+,%1 


{RESTORE R1 


1023 


003722 


012600 






MOV 


(SP)+,%0 


{RESTORE RO 


1024 


003724 


000207 






RTS 


PC 


{RETURN 


1025 
















1026 








;SUBROUTINE TO 


DELAY A SPECIFIED NUMBER OF MILLISECONDS 


1027 


003726 


01 1637 


003772 


DLY: 


MOV 


i>%6, DLCNT 


{GET DELAY COUNT ADDRESS. 


1028 


003732 


062716 


000002 




ADD 


#2,@%6 


{SET UP EXIT ADDRESS 


1029 


003736 


017746 


000030 




MOV 


@DLCNT,-(6) 


{DELAY COUNT TO STACK 


1030 


003742 


00141 1 






BEO 


DLYC 




1031 


003744 


005037 


177776 




CLR 


PSW 


{SET PRIORITY 


1032 


003750 


012746 


000226 


DLYA: 


MOV 


#226, -(6) 


{1 MSEC COUNT TO STACK 


1033 


003754 


005316 




DLYB: 


DEC 


®%6 


{DECREMENT 1 MSEC COUNT 


1034 


003756 


001376 






BNE 


DLYB 


{BRANCH IF NOT 0. 


1035 


003760 


005726 






POPSP 




{ZERO. UNCOVER MSECS. COUNT. 


1036 


003762 


005316 






DEC 


@%6 


{DECREMENT IT 


1037 


003764 


001371 






BNE 


DLYA 


{BR IF NOT DONE DELAYING 


1038 


003766 


005726 




DLYC: 


POPSP 




{DONE 


1039 


003770 


000002 






RTI 




{EXIT. 


1040 
1041 
1042 


003772 


000000 




DLCNT: 


OPEN 




{CONTAINS MILLISECONDS COUNT ADDRESS 








[subroutine to 


STALL A RANDOM NUMBER OF MILLISECONDS. MAXIMUM STALL 


1043 








{DETERMINED BY 


CONTENTS OF LOC 


STLMSK. 


1044 


003774 


004737 


003226 


STAL: 


USR 


%7,RNGEN 


{GO GET RANDOM NUMBER. 


1045 


004000 


043700 


001406 




BIC 


STLMSK,%0 


{# IN RO. APPLY STALL MASK. 


1046 


004004 


001404 






BEO 


STALB 


{BRANCH IF RESULT IS 0, 


1047 


004006- 


010037 


004014 




MOV 


%0, STALA 




1048 


004012 


104016 






DELAY 




{DELAY 


1049 


004014 


000000 




STALA: 


OPEN 




{DELAY COUNT 


1050 
1051 
1052 


004016 


000002 




STALB: 


RTI 




{DONE. EXIT. 








[subroutine to 


GENERATE RANDOM 


CHARACTER COUNT 


1053 


004020 


004737 


003226 


GRCNT: 


JSR 


%7,RNGEN 


{GET RANDOM NUMBER 


1054 


004024 


043700 


004040 




BIC 


RCMSK, %0 


{APPLY MASK 


1055 


004030 


001773 






BEO 


GRCNT 


{TRY AGAIN IF RESULT 


1056 


004032 


010037 


004042 




MOV 


%0, RNCNT 


{COUNT TO RNCNT 


1057 


004036 


000207 






RTS 


%7 


{EXIT. 


1058 


004040 


000000 




RCMSK: 


OPEN 




{RANDOM CHARACTER MASK. 


1059 


004042 


000000 




RnCNT: 


OPEN 




{RANDOM CHARACTER COUNT. 


1060 








; 








1061 








{SUBROUTINE TO 


SKIP ON FLAG AND TIME OUT IF SKIP FAILS 


1062 


004044 


013737 


001410 004112 TMRX: 


MOV 


RXCSR.SIOT 


{SET UP RXCSR ADDRESS 


1063 


004052 


000403 






BR 


TIME1 
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SEQ OOSO 



1064 


004054 


013737 


001414 


004112 


TMTX: 


MOV 


TXCSR.SIOT 


1065 


004062 


005037 


004110 




TIMEi: 


CLR 


TIMER 


1066 


004066 


005237 


004110 




TIME2: 


INC 


TIMER 


1067 


004072 


001405 








BEO 


TIMEX 


1068 


004074 


105777 


000012 






TSTB 


©SIOT 


1069 


004100 


100372 








BPL 


TIME2 


1070 


004102 


062716 


000002 






ADD 


#2,l»%6 


1071 


004106 


000002 






TIMEX: 


RTI 




1072 


004110 


000000 






TIMER: 







1073 


004112 


000000 






SIOT: 







1074 
















1075 










jSUBROUTINE TO 


SELECT LINE 


1076 


004114 


032777 


010000 


174052 


LINSEL: 


BIT 


#BIT12,@SRPTR 


1077 


004122 


001003 








BNE 


LINSLX 


1078 


004124 


005037 


001612 






CLR 


FOUNDV 


1079 


004130 


000205 








RTS 


5 


1080 


004132 


004737 


003516 




LINSLX: 


dSR 


%7,0VRLAY 


1081 


004136 


004737 


003300 






JSR 


%7,CLRCD 


1082 


004142 


104000 








TYPE 




1083 


004144 


016657 








LDLINE 




1084 


004146 


004737 


003554 






JSR 


PC.RDOCT 


1085 


004152 


012637 


001616 






MOV 


(SP) + ,TI:MP 


1086 


004156 


042737 


177740 


001616 




BIC 


#177740, TEMP 



;SET UP TXCSR ADDRESS 

; BRANCH IF COUNTER OVERFLOW 

;SET UP EXIT RETURN 

; BRANCH IF SET 
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SEQ 0021 



1087 
1088 



004164 
004172 



013737 
006337 



001616 
001616 



MOV 
ASL 



TEMP.LINENO 
TEMP 



;SAVE FOR TYPING 
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SEQ ooaa 



1089 


004176 


01 3701 


001616 






MOV 


TEMP,%1 




1090 


004202 


016101 


001200 






MOV 


RXCR0(1),%1 


GET RXCSR DEVICE ADDRESS 


1091 


004206 


032701 


000001 






BIT 


)^BIT0,%1 


IS DEVICE THERE 


1092 


004212 


001403 








BEO 


LINB 


YES 


1093 


004214 


104000 






LINA: 


TYPE 




NO, REPORT 


1094 


004216 


017210 








MNOLIN 






1095 


004220 


000744 








BR 


LINSLX 




1096 


004222 


004737 


006072 




LINB: 


JSR 


%7,F0RMAD 




1097 


004226 


005037 


177776 






CLR 


PSW 




1098 


004232 


052737 


000001 


001472 




BIS 


<^BITO,FMAP 


SET MAPPING FLAG 


1099 


004240 


042777 


000100 


175146 




BIC 


#BIT6,®TXCSR 




1100 


004246 


052777 


000100 


175140 




BIS 


*?BIT6,@TXCSR 




1101 


004254 


000240 








NOP 






1102 


004256 


000240 








NOP 






1103 


004260 


005737 


001420 






TST 


RXVTR 




1104 


004264 


001753 








BEQ 


LINA 




1105 


004266 


042777 


000100 


175120 




BIC 


*BIT6.@TXCSR 




1106 


004274 


012737 


000340 


177776 




MOV 


#PRTY7,PSW 




1107 


004302 


004537 


004474 






JSR 


S.OACNV 


TYPE LINE # 


1108 


004306 


001614 








LINENO 






1109 


004310 


016716 








SELINE 






1110 


004312 


000002 








2 






1111 


004314 


104000 








TYPE 






1112 


004316 


016705 








ALINE 






1113 


004320 


000205 








RTS 


5 




1 1 14 


















1115 










•SUBROUTINE TO 


INITIALIZE BINARY 


COUNT PATTERNS 


1116 


004322 


012737 


177777 


004344 


INBIN: 


MOV 


#-1 ,RIND 


SET ALL VARIABLES 


1117 


004330 


004537 


004562 






JSR 


%5,BM0VE 


TO MINUS 1. 


1 1 18 


004334 


004344 








RIND 






1119 


004336 


004345 








RIND+1 






1120 


004340 


000013 








11 . 






1121 


004342 


000207 








RTS 


%7 


EXIT 


1122 


004344 


000000 






rind: 


OPEN 






1123 


004346 


000000 






PTO: 


OPEN 






1 124 


004350 


000000 






PTi: 


OPEN 






1125 


004352 


000000 






PIND: 


OPEN 






1126 


004354 


000000 






PTOP: 


OPEN 






1127 


004356 


000000 






PTIP: 


OPEN 






1 128 


















1 129 










•SPECIAL BINARY 


COUNT PATTERN SUBROUTINE. EXITS WITH BIN CI 


1130 


004360 


013737 


004346 


004350 


GTBIN: 


MOV 


PTO, PTI 


PREVIOUS BIN CHAR TO PTI 


1131 


004366 


005137 


004350 






COM 


PTI 




1132 


004372 


005137 


004344 






COM 


RIND 




1133 


004376 


001002 








BNE 


,+6 




1134 


004400 


005237 


004350 






INC 


PTI 




1135 


004404 


042737 


177400 


004350 




BIC 


#177400, PTI 


MASK TO 8 BITS 


1136 


004412 


013737 


004350 


004346 




MOV 


PTI ,PTO 


SAVE BIN CHAR IN PTO 


1137 


004420 


013700 


004350 






MOV 


PT1,%0 


BIN CHAR TO RO. 


1138 


004424 


000207 








RTS 


%7 


EXIT. 


1139 


004426 


013737 


004354 


004356 


GTBINP: 


MOV 


PTOP, PTIP 


PREVIOUS BIN CHAR TO PTIP 


1140 


004434 


005137 


004356 






COM 


PT1P 




1 141 


004440 


005137 


004352 






COM 


PIND 




1142 


004444 


001002 








BNE 


.+6 




1143 


004446 


005237 


004356 






INC 


PTIP 




1144 


004452 


042737 


177400 


004356 




BIC 


#177400, PTIP 


MASK TO 8 BITS. 



) 
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SEQ 0023 



1145 
1146 
1147 
1148 
1149 
1150 
1151 
1152 
1153 
1154 
1155 
1156 
1157 
1158 
1159 
1160 
1161 
1162 
1163 
1164 
1165 
1166 
1167 
1168 
1169 
1170 
1171 
1172 
1173 
1174 
1175 
1176 
1177 
1178 
1179 
1180 
1181 
1182 
1183 
1184 
1185 
1186 
1187 
1188 
1189 
1190 
1191 
1192 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1200 



004460 013737 004356 
004466 013701 004356 
004472 000207 



MOV 
MOV 
RTS 



PTIP, PTOP 

PT1P,%1 

%7 



004474 
004476 
004502 
004504 
004506 
004510 
004514 
004520 
004524 
004526 
004534 
004540 
004544 
004550 
004552 
004554 
004556 
004560 



004562 
004564 
004566 
004570 
004572 
004574 
004576 
004600 
004602 



004604 
004606 
004612 
004614 
004620 
004624 
004630 
004636 
004642 
004646 
004652 
004654 
004660 
004664 
004670 
004672 
004674 
004676 
004700 
004702 



104013 
013537 
012501 
012502 
060201 
013703 
042703 
062703 
110341 
042737 
006037 
006037 
006037 
005302 
001356 
104014 
000205 
000000 



104013 
012501 
012502 
012503 
112122 
005303 
001375 
104014 
000205 



104013 
012700 
013501 
012537 
012537 
012702 
012737 
012237 
004737 
005337 
001371 
163700 
010037 
004537 
000000 
000000 
000000 
104014 
000205 
005037 



004560 
177770 
000060 

000007 
004560 
004560 
004560 



004762 

004672 
004674 
004750 
000005 
004746 
004702 
004742 

004674 
004670 
004562 



lOCTAL TO ASCII CONVERT ROUTINE 
OACNV: SAVREG 

MOV 

MOV 

MOV 

ADD 
OACNVA: MOV 

BIC 

ADD 

MOVB 

BIC 

ROR 

ROR 

ROR 

DEC 

BNE 

RSTREG 

RTS 
OACNVX: OPEN 



@(5)+,0ACNVX 

{5)+,%1 

(5)+,%2 

%2,%1 

OACNVX, %3 

#177770, %3 

#60, %3 

%3,-(1) 

#7, OACNVX 

OACNVX 

OACNVX 

OACNVX 

%2 

OACNVA 

%5 



JSAVE BIN CHAR IN PTOP. 
;BIN CHAR TO R1 . 
;EXIT. 



;GET OCTAL VALUE. 

;GET DESTINATION ADDR. 

;GET CONVERT COUNT. 

; DEVELOP ADDR TO STORE 1ST CHAR. 

; ISOLATE LEAST SIGNIFICANT DIGIT. 
;CONVERT DIGIT TO ASCII. 
; STORE ASCII CHARACTER. 



;DONE ALL DIGITS? 
; BRANCH IF NOT DONE. 



;DONE. EXIT. 



;SUBROUTINE TO MOVE A VARIABLE NUMBER OF BYTES. 



SAVREG 

MOV 

MOV 

MOV 

MOVB 

DEC 

BNE 

RSTREG 

RTS 



(5)+,%1 

(5)4-,%2 

(5)+,%3 

(1)+,(2)+ 

%3 

BMOVA 

%5 



;SAVE REGS. 

;GET"FROM"ADDRESS 

;GET"TO"ADDRESS 

;GET COUNT 

;MOVE BYTE 

; DECREMENT COUNT 

; BRANCH IF NOT DONE. 

; RESTORE REGS. 

;DONE EXIT 



;BINARY TO DECIMAL ASCII CONVERT SUBROUTINE. 
BDCNV: SAVREG 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 
BDCNVA: MOV 

JSR 



DEC 
BNE 
SUB 
MOV 
JSR 




RSTREG 
RTS 
SUBTEN: CLR 



BDCNVB: 
BDCNVC: 
BDCNVD: 



#DECVAL,%0 

@{5)+,%1 

(5)+, BDCNVC 

(5)+,BDCNVL 

#ADTENP,%2 

#5,CNVCTR 

(2)+,TENPWR 

%7, SUBTEN 

CNVCTR 

BDCNVA 

BDCNVD, %0 

%0, BDCNVB 

%5,BM0VE 



%5 
DIGIT 



;SET UP ADDR TO STORE DECIMAL ASCII IN RO 

;BINARY VALUE TO R1 . 

;GET DEST ADDR 

;GET CHAR COUNT 

;ADDR OF TEN POWER STRING TO R2. 

;SET UP FOR 5 POWER CONVERSIONS. 

;MOVE POWER OF TEN VALUE TO TENPWR. 

; PERFORM CONVERSION 

;DONE 5 CONVERSIONS? 

; BRANCH IF NOT YET 5. 



;YES, EXIT. 
;CLEAR DIGIT 
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SEQ 0024 



1201 


004706 


163701 


004746 




subtna: 


SUB 


TENPWR, %1 


; SUBTRACT TEN POWER FROM BINARY V 


1202 


004712 


103403 








BCS 


SUBTNB 


; BRANCH IF UNSUCCESSFUL SUBTRACT! 


1203 


004714 


005237 


004744 






INC 


DIGIT 




1204 


004720 


000772 








BR 


SUBTNA 




1205 


004722 


063701 


004746 




SUBTNB: 


ADD 


TENPWR, %1 


; RESTORE SUBTRACTED VALUE. 


1206 


004726 


062737 


000060 


004744 




ADD 


#60, DIGIT 


;CONVERT (DIGIT) TO ASCII 


1207 


004734 


113720 


004744 






MOVB 


DIGIT, (0)+ 


-.MOVE ASCII CHAR TO DECVAL FIELD. 


1208 


004740 


000207 








RTS 


%7 


;EXIT. 


1209 


004742 


000000 






CNVCTR: 


OPEN 






1210 


004744 


000000 






digit: 


OPEN 






1211 


004746 


000000 






tenpwr: 


OPEN 






1212 


004750 


023420 






ADTENP: 


10000. 






1213 


004752 


001750 








1000. 






1214 


004754 


000144 








100. 






1215 


004756 


000012 








10. 






1216 


004760 


000001 








1 






1217 


004762 


040 


040 


040 


DECVAl: 


.BYTE 


040,040,040,040, 


,040,040 


1218 


004765 


040 


0-0 


040 










1219 


004770 


042777 


000002 


174412 


dattst: 


BIG 


#BIT1,@RXCSR 


; CLEAR DATA TERM. READY 


1220 


004776 


052777 


000004 


174410 




BIS 


#BIT2.@TXCSR 


;SET MAINTENANCE BIT 


1221 


005004 


012737 


000144 


001 564 




MOV 


#100. ,CTRO 


;GET CHARACTER COUNT 


1222 


005012 


105777 


174376 




DATAA: 


TSTB 


@TXCSR 


;WAIT FOR 


1223 


005016 


100375 








BPL 


.-4 


; READY FLAG 


1224 


005020 


004737 


004426 






JSR 


7,GTBINP 


;GET CHARACTER 


1225 


005024 


1 10137 


001560 






MOVB 


%1 ,CRBUFA 


-.MOVE CHARACTER 


1226 


005030 


004737 


005374 






dSR 


7,MASKIT 


;MASK OF"^ NON TRANSMITTED BITS 


1227 


005034 


110177 


174356 






MOVB 


%1 ,®TXBUF 


;TRANSMIT CHARACTER 


1228 


005040 


105777 


174344 






TSTB 


©RXCSR 


;WAIT FOR 


1229 


005044 


100375 








BPL 


.-4 


;DONE FLAG 


1230 


005046 


117737 


174340 


001556 




MOVB 


©RXBUF.CRBUF 


;GET RECEIVED CHARACTER 


1 231 


005054 


104004 








DATCHK 




;CHK DATA 


1232 


005056 


005337 


001564 






DEC 


CTRO 


; DECREMENT CHARACTER COUNT 


1233 


005062 


001353 








BNE 


DATAA 




1234 


005064 


005726 








TST 


(6) + 


;POP STACK 


1235 


005066 


104012 








SCOPE 






1236 
1237 


005070 


104000 






SETSR: 


TYPE 




;TYPE SELECT OPTION MESSAGE. 


1238 


005072 


016117 








ASETSR 






1239 


005074 


000000 








HALT 




; COMMON HALT. 


1240 
1241 


005076 
005100 


000207 
104000 






INCRTN: 


RTS 
TYPE 


%7 


jEXIT. 

;TYPE INCORRECT ROUTINE SELECTED, 


1242 


005102 


016216 








AINCRT 






1243 


005104 


000000 








HALT 




; COMMON HALT. 


1244 


005106 


000207 








RTS 


%7 


;EXIT. 


1245 


005110 


104000 






INCRPG: 


TYPE 






1246 


005112 


016337 








AINCPG 






1247 


0051 14 


000000 








HALT 






1248 


0051 16 


000137 


002044 






JMP 


START 




1249 


005122 


005037 


001612 




PRGEND: 


CLR 


FOUNDV 




1250 


005126 


032777 


020000 


173040 




BIT 


#BIT13,#SRPTR 


; INHIBIT PRINT SET? 


1251 


005134 


001026 








BNE 


PRGEXT 


;BR IF SET 


1252 


005136 


004537 


004604 






JSR 


%5,BDCNV 




1253 


005142 


001636 








PASCNT 






1254 


005144 


016407 








APCNT 






1255 


005146 


000006 








6 






1256 


005150 


004537 


004474 






dSR 


%5,0ACNV 


; CONVERT LINE NUMBER 



ill 
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SE9 0025 



1257 


005154 


001614 








LINENO 






1258 


005156 


016427 








ACLIN 






1259 


005160 


000002 








2 






1260 


005162 


004537 


004474 






JSR 


%5,0ACNV 


; CONVERT RXCSR 


1261 


005166 


001410 








RXCSR 






1262 


005170 


016443 








APRXC 






1263 


005172 


000006 








6 






1264 


005174 


004537 


004474 






JSR 


%5,0ACNV 


; CONVERT VECTOR 


1265 


005200 


001420 








RXVTR 






1266 


005202 


016464 








APVEC 






1267 


005204 


000004 








4 






1268 


005206 


104000 








TYPE 




;TYPE PROGRAM END. 


1269 


005210 


016372 








APGEND 






1270 


005212 


032777 


010000 


172754 


PRGEXT: 


BIT 


#BIT12,#SRPTR 


;LOCK ON LINE 


1271 


005220 


001403 








BEO 


PRGXT1 


;BR IF NOT SET 


1272 


005222 


005237 


001636 






INC 


PASCNT 




1273 


005226 


000425 








BR 


PRGXTL 




1274 


005230 


013737 


001614 


001616 


PRGXT1 : 


MOV 


LINENO, TEMP 


;GET LINENO 


1275 


005236 


006337 


001616 






ASL 


TEMP 




1276 


005242 


062737 


000002 


001616 


PRGEC: 


ADD 


#2, TEMP 


;UPDATE LINE NUMBER 


1277 


005250 


013701 


001616 




PRGEA: 


MOV 


TEMP,%1 




1278 


005254 


01 6101 


001200 






MOV 


RXCR0(1),%1 


;GET RXCSR DEVICE ADDRESS 


1279 


005260 


022701 


177777 






CMP 


#177777, %1 


;LAST ONE 


1280 


005264 


001023 








BNE 


PRGEB 


;N0, CONTINUE 


1281 


C05266 


005237 


001636 






INC 


PASCNT 




1282 


005272 


005037 


001614 






CLR 


LINENO 




1283 


005276 


005037 


001616 






CLR 


TEMP 




1284 


005302 


013705 


000042 




PRGXTL: 


MOV 


@#42,%5 




1285 


005306 


001405 








BEO 


CONT 




1286 


005310 


000005 








RESET 






1287 


005312 


004715 






logic: 


JSR 


7,(5) 




1288 


005314 


000240 








NOP 






1289 


005316 


000240 








NOP 






1290 


005320 


000240 








NOP 






1291 


005322 


032777 


010000 


172644 


CONT: 


BIT 


#BIT12,®>SRPTR 


JLOCK ON LINE 


1292 


005330 


001747 








BEO 


PRGEA 


; BRANCH IF NOT SET 


1293 


005332 


000207 








RTS 


7 




1294 


005334 


032701 


000001 




PRGEB: 


BIT 


#BIT0,%1 


; DEVICE THERE 


1295 


005340 


001340 








BNE 


PRGEC 


;N0 


1296 


005342 


006237 


001616 






ASR 


TEMP 




1297 


005346 


013737 


001616 


001614 




MOV 


TEMP, LINENO 




1298 


005354 


004737 


006072 






JSR 


%7,F0RMAD 




1299 


005360 


000207 








RTS 


%7 


;EXIT. 


1300 


















1301 










•CONDITIONAL ERROR HALT ROUTINE. 




1302 


005362 


005777 


172606 




EHLT: 


TST 


(PSRPTR 


; CHECK FOR HALT ON ERROR. 


1303 


005366 


100001 








BPL 


EHLTA 


; BRANCH IF NO HALT DESIRED, 


1304 


005370 


000000 








HALT 




;HALT. 


1305 


005372 


000002 






EHLTA: 


RTI 




;IN DATA LIGHTS. 


1306 










; 








1307 










;MASKIT 


- MASK 


DATA ACCORDING TO 


LINE NUMBER 


1308 


005374 


013737 


001402 


001404 


MASKIT: 


MOV 


UMASK.RMASK 


;GET MASK 


1309 


005402 


042737 


177000 


0014C4 




BIC 


#1 77000, RMASK 


; REMOVE C/D FLAG+PRIORITY 


1310 


005410 


005137 


001404 






COM 


RMASK 




1311 


005414 


043737 


001404 


001560 




BIC 


RMASK.CRBUFA 


;MASK DESIRED BITS 


1312 


005422 


000207 








RTS 


7 
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SE9 003S 



1313 










; 






1314 










;DATA 1 


CHECK ROUTINE, TEST ERROI 


1315 


005424 


017737 


173762 


001562 


OTCHK: 


MOV 


#RXBUF, CRBUFB 


1316 


005432 


032737 


170000 


001562 




BIT 


#170000, CRBUFi 


1317 


005440 


001004 








BNE 


DTCHKX 


1318 


005442 


023737 


001556 


001560 




CMP 


CRBUF, CRBUFA 


1319 


005450 


001421 








BEQ 


DTCHKA 


1320 


005452 


004537 


004474 




DTCHKX 


: JSR 


%5,0ACNV 


1321 


005456 


001556 








CRBUF 




1322 


005460 


016074 








AWAS 




1323 


005462 


000003 








3 




1324 


005464 


004537 


004474 






JSR 


%5,QACNV 


1325 


005470 


001560 








CRBUFA 




1326 


005472 


016063 








AASB 




1327 


005474 


000003 








3 




1328 


005476 


004537 


004474 






JSR 


%5,0ACNV 


1329 


005502 


001562 








CRBUFB 




1330 


005504 


016107 








ARXBUF 




1331 


005506 


000006 








6 




1332 


005510 


104015 








ERR0R1 




1333 


005512 


016051 








ERDAT 




1334 


005514 


000002 






DTCHKAi 


: RTI 




1335 










; 






1336 










; ERROR 


HANDLER 




1337 


005516 


012737 


177777 


005666 


err: 


MOV 


#-1,ERRB 


1338 


005524 


012737 


000240 


005670 




MOV 


#240,ERRB+2 


1339 


005532 


005037 


005704 






CLR 


ERRE 


1340 


005536 


000413 








BR 


ERRA 


1341 


005540 


01 1637 


005666 




ERRi: 


MOV 


g>%6,ERRB 


1342 


005544 


017737 


000116 


005666 




MOV 


@ERRB,ERRB 


1343 


005552 


012737 


177777 


005670 




MOV 


#-1,ERRB+2 


1344 


005560 


012737 


000002 


005704 




MOV 


*2,ERRE 


1345 


005566 


032777 


020000 


172400 


ERRA: 


BIT 


*BIT13,@SRPTR 


1346 


005574 


001036 








BNE 


ERRC 


1347 


005576 


011637 


005702 






MOV 


@%6.ERRD 


1348 


005602 


162737 


000002 


005702 




SUB 


#2, ERRD 


1349 


005610 


013737 


001456 


001460 




MOV 


RTNNO, TNNO 


1350 


005616 


042737 


100000 


001460 




BIC 


#BIT15,TNN0 


1351 


005624 


004537 


004474 






JSR 


%5,0ACNV 


1352 


005630 


005702 








ERRD 




1353 


005632 


015240 








APC 




1354 


005634 


000006 








6 




1355 


005636 


004537 


004474 






USR 


%5,QACNV 


1356 


005642 


001410 








RXCSR 




1357 


005644 


015257 








MRXNUM 




1358 


005646 


000006 








6 




1359 


005650 


004537 


004474 






USR 


%5,0ACNV 


1360 


005654 


001456 








RTNNO 




1361 


005656 


015230 








ATNUMB 




1362 


005660 


000003 








3 




1363 


005662 


104001 








TYPES 




1364 


005664 


015226 








EMO 




1365 


005666 


000000 






ERRB: 


OPEN 




1366 


005670 


177777 








-1 




1367 


005672 


104010 






ERRC: 


EHALT 




1368 


005674 


063716 


005704 






ADO 


ERRE.@%6 



BITS 

;DID ANY ERROR BITS SET 

;YES TYPE ERROR 

; COMPARE EXPECTED AND RECEIVED 

; CHARS. BRANCH IF SAME. 

;G0 TO OCTAL TO ASCII CONVERT, 

; SOURCE ADDR. 

; DESTINATION ADDR. 

;#0F DIGITS TO CONVERT. 

;G0 TO OCTAL TO ASCII CONVERT. 

; SOURCE ADDR. 

{DESTINATION ADDR. 

J#OF DIGITS TO CONVERT. 



;SET UP ONE MESSAGE CALL. 



; DEVELOP ADDT'L MESSAGE ADOR. 
; STORE AT ERRB. 



; INHIBIT ERROR PRINT? 

; BRANCH TO INHIBIT PRINT. 

; DEVELOP CALLING ADDR. 



;G0 TO OCTAL TO ASCII CONVERT. 

; SOURCE ADDR. 

{DESTINATION ADDR. 

•,#0F DIGITS TO CONVERT. 

;G0 TO OCTAL TO ASCII CONVERT. 

{SOURCE ADDR. 

{DESTINATION ADDR. 

{*0F dig;.ts to convert. 

{GO TO OCTAL TO ASCII CONVERT. 

{SOURCE ADDR. 

{DESTINATION ADDR. 

{#0F DIGITS TO CONVERT. 

{TYPE: 

{ERROR HEADER. 

{ADDT'L ERROR MESSAGE IF ANY. 

{GO ERR HALT IF DESIRED. 
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SEQ 0027 



1369 
1370 
1371 
1372 
1373 
1374 
1375 
1376 
1377 
1378 
1379 
1380 
1381 
1382 
1383 
1384 
1385 
1386 
1387 
1388 
1389 
1390 
1391 
1392 
1393 
1394 
1395 
1396 
1397 
1398 
1399 
1400 
1401 
1402 
1403 
1404 
1405 
1406 
1407 
1408 
1409 
1410 
1411 
1412 
1413 
1414 
1415 
1416 
1417 
1418 
1419 
1420 
1421 
1422 
1423 
1424 



005700 000002 
005702 000000 
005704 000000 



RTI 
ERRD: open 
ERRE: OPEN 



{EXIT. 



005706 
005714 
005722 
005726 
005732 
005736 
005744 
005752 
005756 
005762 
005764 
005766 
005770 
005774 
005776 
006000 
006002 
006004 
006006 
006010 



006014 
006020 
006022 
006026 
006034 
006040 
006042 
006050 
006056 
006064 
006070 



006072 
006076 
006102 
006106 
006112 
006116 
006122 
006126 
006134 
006140 
006146 
006154 
006162 
006166 
006172 
006200 



013737 
012737 
006237 
006237 
006237 
042737 
013737 
011637 
004537 
001632 
017145 
000006 
004537 
001634 
017177 
000006 
104000 
017100 
000000 
000137 



01 1637 
022626 
011637 
162737 
005737 
001746 
013737 
162737 
013737 
005037 
000002 



010137 
062701 
010137 
062701 
010137 
062701 
010137 
013737 
006337 
062737 
017737 
013737 
000337 
006337 
042737 
013737 



177776 
000340 
001470 
001470 
001470 
177740 
001470 
001634 
004474 



001634 
000004 
001472 

001632 
000004 
001632 
001472 



001410 
000002 
001412 
000002 
001414 
000002 
001416 
001614 
001616 
001302 
173444 
001620 
001620 
001620 
177437 
001620 



001470 
177776 



001470 
001632 



{ERROR TRAP HANDLER - TYPE TO AND FROM WHERE ERROR TRAP OCCURRED 
ERTP: MOV PSW.OLDPS {SAVE OLD STATUS 

#PRTY7,PSW 

OLDPS 

OLDPS 

OLDPS 

#177740, OLDPS 

OLDPS, TOPC 



ERTPA: 



MOV 

ASR 

ASR 

ASR 

BIC 

MOV 

MOV 

USR 

TOPC 

MTO 

6 

USR 

FROMPC 

MFROM 

6 

TYPE 

MTERR 

HALT 

UMP 



©%6, FROMPC 
%5,0ACNV 



%5,0ACNV 



{GET FROM PC 



START 



{MAPVEC - MAP VECTOR OR REPORT ERROR DEPENDING ON pMAP FLAG 



MAPVEC: 



001424 
001632 
001420 



MOV 

P0PSP2 

MOV 

SUB 

TST 

BEQ 

MOV 

SUB 

MOV 

CLR 

RTI 



@%6,T0PC 

@%6, FROMPC 
#4, TOPC 
FMAP 
ERTPA 

TOPC.TXVTR 
#4, TOPC 
TOPC.RXVTR 
FMAP 



{NOT MAPPING, REPORT ERROR 
{STORE VECTOR 



{FORMAD-FORM DEVICE AT ADDRESSES 



001616 
001620 
00140r 



001620 
001422 



MOV 

ADD 

MOV 

ADD 

MOV 

ADO 

MOV 

MOV 

ASL 

ADD 

MOV 

MOV 

SWAB 

ASL 

BIC 

MOV 



%1, RXCSR 

#2,%1 

XI.RXBUF 

#2, XI 

%1,TXCSR 

#2, XI 

XI.TXBUF 

LINENO,TEMP 

TEMP 

#CMASO,TEMP 

©TEMP, TEMPI 

TEMPI .UMASK 

TEMPI 

TEMPI 

#177437, TEMPI 

TEMPI, RXLVL 



{GET PRIORITY 
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siQ ooaa 



1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1448 
1449 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
1471 
1472 
1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 



006206 
006214 



006216 
006224 
006226 
006232 

006234 
006242 
006244 
006252 
006254 
006260 
006262 
006264 
006266 



006270 
006276 
006300 
006304 
006310 
006314 
006322 
006330 
006336 
006340 
006342 
006346 
006350 
006356 
006360 
006362 
006364 
006366 
006372 
006400 
006406 
006412 



006414 
006420 
006422 

006426 
006430 
006432 
006434 
006436 
006440 
006442 



013737 
000207 



032777 
001002 
000137 
000207 

012737 
000000 
012737 
000005 
012706 
104000 
017374 
104003 
000452 



022737 
001045 
004737 
005037 
005037 
052737 
042777 
052777 
000240 
000240 
005737 
001011 
032777 
001344 
104000 
017256 
104003 
000137 
042777 
012737 
005237 
000207 



013700 
006300 
000170 

006500 
014546 
014620 
014716 
014746 
005110 
005110 



001620 001426 



001000 
002410 



006244 
006234 
001176 



001420 
020000 



006270 
000100 
000340 
001612 



001450 
006426 



MOV 
RTS 



TEMPI ,TXLVL 
%7 



DOTHIS - SELECTABLE TEST DECISION MAKER 



DOTHIS: BIT 
BNE 
JMP 

GQBACK: RTS 



000024 
000024 



PFAIL: 
PWRUP: 



#BIT9,#SRPTR 

GOBACK 

GTRDYX 

%7 

#PWRUP,24 

#PFAIL,24 

*SPB0T.%6 



;IS SELECT TEST SWITCH SET 
; RETURN TO TEST IF SW SET 
;G0 TO NEXT TEST 



MOV 

HALT 

MOV 

RESET 

MOV 

TYPE 

MPWRF 

ERROR 

BR 



JDECIDE IF VECTOR TO BE MAPPED AND MAP 



000000 001612 



003516 
001420 
177776 
000001 
000100 
000100 



001472 
173064 
173056 



173014 
177776 



TSTVEC: CMP 
BNE 
JSR 
CLR 
CLR 
BIS 
BIC 
BIS 
NOP 
NOP 
TST 
BNE 
BIT 
BNE 
TYPE 
INTER 
ERROR 
JMP 

TSTVA: BIC 
MOV 
INC 
RTS 



TSTVEX! 



#0,FOUNDV 

TSTVEX 

%7,0VRLAY 

RXVTR 

PSW 

#BITO,FMAP 

#BIT6,@TXCSR 

#BIT6,@TXCSR 



RXVTR 

TSTVA 

#BIT13,©SRPTR 

TSTVEC 



TSTVEC 

#BIT6,@TXCSR 

#PRTY7,PSW 

FOUNDV 

%7 



JRESTART ROUTINE 
RESTART: MOV PRGNUM,%0 

ASL %0 

JMP ©RSTART(O) 

RSTART: PRGOA 
PRG1A 
PRG2A 
PRG3A 
PRG4A 
INCRPG 
INCRPG 



;NEED VECTOR MAPPING 
;N0, EXIT 



;SET MAPPING FLAG 
; CAUSE INTERRUPT 



;DID TRAP OCCUR? 
;YES, OK 



;N0, ERROR 



:RAISE PRIORITY. RETURN 



;G0 RESTART SELECTED PROGRAM 

; PROGRAM RESTART ADDRESS 

; PROGRAM 1 RESTART ADDRESS 

; PROGRAM 2 RESTART ADDRESS 

; PROGRAM 3 RESTART ADDRESS 

; PROGRAM 4 RESTART ADDRESS 
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SEQ 0029 



iiiiil 



1481 


006444 


005110 




1482 








1483 








1484 








1485 








1486 


006446 


012737 


006504 


1487 


006454 


005737 


000042 


1488 


006460 


001005 




1489 


006462 


104000 




1490 


006464 


015270 




1491 


006466 


000000 




1492 


006470 


004737 


005070 


1493 


006474 


004537 


004114 


1494 


006500 


000137 


002402 


1495 




177777 




1496 


006504 






1497 


006504 






1498 








1499 


006504 


100000 




1500 


006506 


006536 




1501 


006510 


001750 




1502 


006512 


006514 




1503 




000000 




1504 








1505 








1506 


006514 


012737 


006530 


1507 


006522 


005077 


1 72662 


1508 


006526 


104012 




1509 


006530 


022626 




1510 


006532 


104003 




1511 


006534 


000774 




1512 


006536 






1513 


006536 






1514 








1515 


006536 


100001 




1516 


006540 


006576 




1517 


006542 


001750 




1518 


006544 


006546 




1519 




000001- 




1520 








1521 








1522 


006546 


012737 


006570 


1523 


006554 


005737 


002016 


1524 


006560 


100402 




1525 


006562 


005777 


1 72624 


1526 


006566 


104012 




1527 


006570 


022626 




1528 


006572 


104003 




1529 


006574 


000774 




1530 


006576 






1531 


006576 






1532 








1533 


006576 


100002 




1534 


006600 


006630 




1535 


006602 


001750 




1536 


006604 


006606 





PRGO - INPUT-OUTPUT LOGIC TESTS 



PRGO: 


MOV 


#ATO,KST/ 


kRT 








TST 


@«42 






; MONITOR LOAD 




BNE 


PRGOB 






;YES, START TEST 




TYPE 








;TYPE TITLE AND INSTRUCTIONS 




POTIT 












HALT 












USR 


7,SETSR 








PRGOB: 


JSR 


S.LINSEL 






;G0 GET LINE # FROM USER 


PRGOA : 


JMP 
X=-l 
TSTA 


GETRDY 






JGET STARTED. 




1000..AA 


CD 








TSTAA 


AA.1000. 


\X+ 


1+CD 


,\X-i-2,\X-i-1 



-.TEST NUMBER 



itc«4!i»«4i«iti4i*4>4>««4>««««*««>««*«it><(>«««it>««« 

ATO: 100000 
ATI 
1000. 
AAA 
X=X+1 

'********************************************************** **liKti 

JTEST ABILITY TO REFERENCE RECEIVER CSR WITHOUT TRAPPING 



ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



«««W«««*«««4>««4>«i 



000004 AAA: 



AAB: 
AAE: 



MOV 

CLR 

SCOPE 

P0PSP2 

ERROR 

BR 

TSTA 

TSTAA 



#AAE,MACHER ;SET UP MACHINE ERROR TRAP. 
StRXCSR ; REFERENCE RXCSR 

;0K IF NO TRAP. SCOPE 



; TRAPPED WHEN REFERENCING RXCSR. 
AAB 

1000., AB. CD 
AB,1000.,\X+1+CD,\X+2,\X+1 

'***************************#********** ***********#***********)»l«*#****0*##**«««* 

ATI: 100001 ;TEST NUMBER 

AT2 ; ADDRESS OF NEXT TEST 

1000. ; ITERATION COUNT 

ABA ; SCOPE ENTRY POINT 

XsX+1 ; 

^ ******************************************** *******#********m«******#***«*^«nf*«' 
JTEST ABILITY TO REFERENCE RECEIVER BUFFER WITHOUT TRAPPING 

;SET UP MACHINE ERROR TRAP. 

; REFERENCE RXBUF 
;0K IF NJ TRAP SCOPE 

STRAPPED WHEN REFERENCING RXBUF 
3,\X+2,\X+1 

'****************!»************* **********************^'*«**0ltl0«*0*'i'**^f*0^*#«**>tl«** 

AT2! 100002 ;TEST NUMBER « 

AT3 ; ADDRESS OF NEXT TEST • 

1000. {ITERATION COUNT * 

ACA ; SCOPE ENTRY POINT * 



aba: 


MOV 


#ABE,MACHER 




TST 


©#XORFLG 




BMI 


ABB 




TST 


#RXBUF 


abb: 


SCOPE 




ABE: 


P0PSP2 
ERROR 






BR 


ABB 




TSTA 


1000., AC, CD 




TSTAA 


AC, 1000., \X- 
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SEQ G030 



1537 




000002 








XssX+1 




; « 


1538 










;***♦ 




1539 










;TEST 


ABILITY TO REFERENCE TRANSMITTER CSR WITHOUT TRAPPING. 


1540 


006606 


012737 


006622 


000004 


ACA: 


MOV 


#ACE,MACHER 


;SET UP MACHINE ERROR TRAP. 


1541 


006614 


005777 


172574 






TST 


©TXCSR 


; REFERENCE TXCSR 


1542 


006620 


104012 






ACB: 


SCOPE 




; SCOPE 


1543 


006622 


022626 






ace: 


P0PSP2 






1544 


006624 


104003 








ERROR 




; TRAPPED WHEN REFERENCING TXCSR 


1545 


006626 


000774 








BR 


ACB 




1546 


006630 










TSTA 


1000. ,AD,CD 




1547 


006630 










TSTAA 


AD.IOOO. ,\X+1+CD,\X+2,\X+1 


1548 










;**** 








1549 


006630 


100003 






AT3: 


100003 




;TEST NUMBER ♦ 


1550 


006632 


006662 








AT4 




JADDRESS OF NEXT TEST * 


1551 


006634 


001750 








1000. 




ITERATION COUNT ♦ 


1552 


006636 


006640 








ADA 




;SCOPE ENTRY POINT * 


1553 




000003 








X = X+1 




; ■> 


1554 
















1555 










•TEST 


ABILITY TO REFERENCE TRANSMITTER BUFFER WITHOUT TRAPPING 


1556 


006640 


012737 


006654 


000004 


ADA: 


MOV 


#ADE,MACHER 


;SET UP MACHINE ERROR TRAP. 


1557 


006646 


005777 


172544 






TST 


@TXBUF 


;REFERENCE TX BUF. 


1558 


006652 


104012 






ADB: 


SCOPE 




; SCOPE 


1559 


006654 


022626 






ADE: 


P0PSP2 






1560 


006656 


104003 








ERROR 




; TRAPPED WHEN REFERENCING TXBUF 


1561 


006660 


000774 








BR 


ADB 




1562 


006662 










TSTA 


10.,AE,CD 




1563 


006662 










TSTAA 


AE,10.,\X+1+CD 


,\X+2.\X+1 


1564 












«iti>|i««itc*>|iDi««»«*>t< 




1565 


006562 


100004 






AT4: 


100004 




;TEST NUMBER ♦ 


1566 


006664 


006762 








ATS 




; ADDRESS OF NEXT TEST ♦ 


1567 


006666 


000012 








10. 




; ITERATION COUNT * 


1568 


006670 


006672 








AEA 




; SCOPE ENTRY POINT ♦ 


1569 




000004 








X = X+1 




1 * 


1570 










Ji^***^******^:!!!!!! 




1571 










;TEST 


THAT TXCSR BIT (BREAK) 


CAN BE SET AND CLEARED 


1572 










;AND THAT RESET 


CLEARS IT 




1573 


006672 


032777 


000001 


172514 


AEA: 


BIT 


#BITO.@TXCSR 


;SEE IF BIT IS CLEAR 


1574 


006700 


001402 








BEQ 


AEB 


;BR IF CLEAR 


1575 


006702 


104003 








ERROR 




; RESET DID NOT CLEAR IT 


1576 


006704 


000421 








BR 


AED 




1577 


006706 


052777 


000001 


172500 


AEB: 


BIS 


#BITO,iiTXCSR 


;SET TXCSR BIT 


1578 


006714 


032777 


000001 


172472 




BIT 


#BITO,@TXCSR 


;DID IT SET 


1579 


006722 


001002 








BNE 


AEC 


;YES, GO ON 


1580 


006724 


104003 








ERROR 




;TXCSR BITO FAILED TO SET 


1581 


006726 


000410 








BR 


AED 




1582 


006730 


042777 


000001 


172456 


AEC: 


BIC 


#BITO,@TXCSR 


JCLEAR TXCSR BIT 


1583 


006736 


032777 


000001 


172450 




BIT 


#BITO, ©TXCSR 


;DID IT CLEAR 


1584 


006744 


001401 








BEO 


AED 




1585 


006746 


104003 








ERROR 




; TXCSR BIT DID NOT CLEAR 


1586 


006750 


052777 


000001 


172436 


AED: 


BIS 


#BITO,@TXCSR 




1587 


006756 


104011 








SRESET 




; ISSUE RESET TO CLEAR 


1588 


006760 


104012 








SCOPE 






1589 


006762 










TSTA 


10., AG. CD 




1590 


006762 










TSTAA 


AG, 10. ,\X+1+CD 


\X+2,\X+1 


1591 










•i^^f.^itf****>¥****Mf 




1592 


006762 


100005 






AT5: 


100005 




;TEST NUMBER * 



.) 
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SEO 0031 



1593 


006764 


007062 








AT6 




; ADDRESS OF NEXT TEST « 


1594 


006766 


000012 








10. 




ITERATION COUNT * 


1595 


006770 


006772 








AGA 




; SCOPE ENTRY POINT * 


1596 




000005 








X = X+1 




; * 


1597 
















1598 










JTEST 


THAT TXCSR BIT2 CAN BE SET 


, CLEARED, AND THAT RESET CLEARS XT. 


1599 


006772 


032777 


000004 


172414 


AGA: 


BIT 


#BIT2, ©TXCSR 


;SEE IF TXCSR BIT2 IS CLEAR. 


1600 


007000 


001402 








BEO 


AGB 


;BRANCH IF BIT IS CLEAR. 


1601 


007002 


104003 








ERROR 




; RESET DID NOT CLEAR TXCSR BIT2 


1602 


007004 


000421 








BR 


AGD 




1603 


007006 


052777 


000004 


172400 


AGB: 


BIS 


#BIT2,@TXCSR 


;SET TXCSR BIT2. 


1604 


007014 


032777 


000004 


172372 




BIT 


(S'BIT2, ©TXCSR 


;SEE IF BIT IS SET. 


1605 


007022 


001002 








BNE 


AGC 


.BRANCH IF BIT IS SET. 


1606 


007024 


104003 








ERROR 




TXCSR BIT2 FAILED TO SET. 


1607 


007026 


000410 








BR 


AGD 




1608 


007030 


042777 


000004 


172356 


AGC: 


BIC 


#BIT2, ©TXCSR 


CLEAR TXCSR BIT2 


1609 


007036 


032777 


000004 


172350 




BIT 


#BIT2, ©TXCSR 


SEE IF BIT IS CLEAR. 


1610 


007044 


001401 








BEO 


AGD 




161 1 


007046 


104003 








ERROR 




TXCSR BIT2 FAILED TO CLEAR. 


1612 


007050 


052777 


000004 


172336 


AGD: 


BIS 


#BIT2, ©TXCSR 


SET TXCSR BIT2. 


1613 


007056 


104011 








SRESET 




ISSUE RESET TO CLEAR BIT. 


1614 


007060 


104012 








SCOPE 




SCOPE 


1615 


007062 










TSTA 


10.,AJ,CD 




1616 


007062 










TSTAA 


AJ.IO. ,\X+1+CD,\> 


<+2,\X+1 


1617 














1618 


007062 


100006 






AT6: 


100006 




TEST NUMBER « 


1619 


007064 


007170 








AT7 




ADDRESS OF NEXT TEST ♦ 


1620 


007066 


000012 








10. 




ITERATION COUNT « 


1621 


007070 


007072 








AJA 




SCOPE ENTRY POINT ♦ 


1622 




000006 








X = X+1 




« 


1623 












^>*m*>i'>if*****i)'*****A 




1624 










•TEST 


THAT TXCSR BIT6 CAN BE SET 


CLEARED, AND THAT RESET CLEARS 11. 


1625 


007072 


012737 


000340 


177776 


AJA: 


MOV 


#PRTY7,PSW 


SET PRIORITY 7. 


1626 


007100 


032777 


000100 


172306 




BIT 


#BIT6, ©TXCSR 


SEE IF TXCSR BIT6 IS CLEAR. 


1627 


007106 


001402 








BEO 


AJB 


BRANCH IF BIT IS CLEAR. 


1628 


007110 


104003 








ERROR 




RESET DID NOT CLEAR TXCSR BITS 


1629 


007112 


000421 








BR 


AJD 




1630 


007114 


052777 


000100 


172272 


AJB: 


BIS 


#BIT6, ©TXCSR 


SET TXCSR BIT6. 


1631 


007122 


032777 


000100 


172264 




BIT 


#BIT6, ©TXCSR 


SEE IF BIT IS SET. 


1632 


007130 


001002 








BNE 


AJC ; 


BRANCH IF BIT IS SET. 


1633 


007132 


104003 








ERROR 




TXCSR BIT6 FAILED TO SET. 


1634 


007134 


000410 








BR 


AJD 




1635 


007136 


042777 


000100 


172250 


AJC: 


BIC 


#BIT6, ©TXCSR ; 


CLEAR TXCSR BIT6 


1636 


007144 


032777 


000100 


172242 




BIT 


#BIT6, ©TXCSR ; 


SEE IF BIT IS CLEAR. 


1637 


007152 


001401 








BEO 


AJD 




1638 


007154 


104003 








ERROR 




TXCSR BIT6 FAILED TO CLEAR. 


1639 


007156 


052777 


000100 


172230 


AUD: 


BIS 


#BIT6, ©TXCSR • 


SET TXCSR BIT6. 


1640 


007164 


104011 








SRESET 




ISSUE RESET TO CLEAR BIT. 


1641 


007166 


104012 








SCOPE 




SCOPE 


1642 


007170 










TSTA 


100.,AK,CD 




1643 


007170 










TSTAA 


AK.IOO. ,\X+1+CD,\ 


X-l-2,\X+1 


1644 














1645 


007170 


100007 






AT7: 


100007 




TEST NUMBER « 


1646 


007172 


007214 








AT10 




ADDRESS OF NEXT TEST « 


1647 


007174 


000144 








100. 




ITERATION COUNT « 


1648 


007176 


007200 








AKA 




SCOPE ENTRY POINT « 



^ 



') 
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SEQ 0033 



) 



1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 
1659 
1660 
1661 
1662 
1663 
1664 
1665 
1666 
1667 
1668 
1669 
1670 
1671 
1672 
1673 
1674 
1675 
1676 
1677 
1678 
1679 
1680 
1681 
1682 
1683 
1684 
1685 
1686 
1687 
1688 
1689 
1690 
1691 
1692 
1693 
1694 
1695 
1696 
1697 
1698 
1699 
1700 
1701 
1702 
1703 
1704 



007200 
007204 
007206 
007210 
007212 
007214 
007214 



105777 
100402 
104003 
104011 
104012 



007224 
007232 
007240 
007246 
007250 
007252 
007254 
007262 
007270 
007272 
007274 
007276 
007276 



042777 
052777 
032777 
001002 
104003 
000410 
042777 
032777 
001401 
104003 
104012 



007276 000011 
007300 007376 
007302 000012 
007304 007306 
000011 



007306 
007314 
007316 
007320 
007322 
007330 
007336 
007340 
007342 
007344 
007352 
007360 
007362 
007364 
007372 
007374 



032777 
001402 
104003 
000421 
052777 
032777 
001002 
104003 
000410 
042777 
032777 
001401 
104003 
052777 
104011 
104012 



;TEST 
;THAT 
AKA: 



X = X+1 

THAT TXCSR BIT 7 (READY 
IT CAN BE READ RELIABLY. 



007214 000010 
007216 007276 
007220 000144 
007222 007224 
000010 



TSTB 

BMI 

ERROR 

SRESET 

SCOPE 

TSTA 

TSTAA 

10 

AT11 
100. 
ALA 
X = X+1 



@TXCSR 
AKB 



BIT) IS SET UPON ENTERING ROUTINE AND 

;SEE IF TXCSR BIT 7 IS SET. 

; BRANCH IF SET. 

;TXCSR BIT 7 NOT SET. 

; ISSUE RESET TO CLEAR BIT IF ERROR 

; SCOPE 



100. ,AL,0 
AL.IOO. ,\X+1+0, 

c « 4: « 41 * 4: # * 4: « 1)1 « 4< # !i 



\X+2,\X4-1 

TEST NUMBER 
ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



ii»>!>>»w4!iti4<«««#<i4>««4<«« 



«sK<|<4:«iti««itiDi«4i««««itijti4i«4t««««««« 



000002 

000002 
000002 



000002 
000002 



000004 
000004 



000004 
000004 



172156 
172150 
172142 



172126 
172120 



;TEST 
ALA: 



THAT RXCSR BIT 1 CAN BE 
BIC #BIT1,@RXCSR 
#BIT1 ,@RXCSR 
#BIT1 ,@k'XCSR 
ALY 



SET + CLEARED 



000004 172074 



;TEST 
APA: 



BIS 

BIT 

BNE 

ERROR 

BR 

BIC 

BIT 

BEO 

ERROR 

SCOPE 

TSTA 

TSTAA 

11 

AT12 
10. 
APA 
X = X+1 

THAT RXCSR BIT2 IS CLEAR 



ALZ 

#BIT1 .(PRXCSR 

#BIT1 .@RXCSR 

ALZ 



10. ,AP,0 
AP,10. ,\X+1+0, 



;SET RXCSR BIT1 

;SEE IF BIT IS SET 

; BRANCH IF SET 

;RXCSR BIT 1 FAILED TO SET 

jCLEAR RXCSR BIT 1 
;SEE IF BIT IS CLEAR 

; RXCSR BIT 1 FAILED TO CLEAR 

; SCOPE 



«DiDi«««)ti4:ii,>|ci|t«<i»««««««s«i««««i|iitii»i^4i4i4i4i 



172060 
172052 



172036 
172030 



000004 172016 APD: 



BIT 

BEO 

ERROR 

BR 

BIS 

BIT 

BNE 

ERROR 

BR 

BIC 

BIT 

BEO 

ERROR 

BIS 

SRESET 

SCOPE 



#BIT2,PRXCL.< 
APB 

APD 

#BIT2,@RXCSR 
#BIT2,@RXCSR 
APCX 

APD 

#BIT2,@RXCSR 
#BIT2,@RXCSR 
APD 

#BIT2, ©RXCSR 



\X+2,\X+1 

TEST NUMBER 
ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 

AND CAN BE READ RELIABLY. 
;SEE IF RXCSR BIT2 IS CLEAR. 
-.BRANCH IF BIT IS CLEAR. 
;RXCSR BIT2 IS NOT CLEAR. 



;SET RXCSR BIT2 

;SEE IF :.IT IS SET 

; BRANCH IF SET 

;RXCSR BIT2 FAILED TO SET 

;CLEAR RXeSR BIT2 
;SEE IF BIT IS CLEAR 

RXCSR BIT2 FAILED TO CLEAR 

SET BIT 

ISSUE RESET TO CLEAR BIT 
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SEQ 0033 



1705 


007376 










TSTA 


10.,A0.0 




1706 


007376 










TSTAA 


A0,10. ,\X+1+0,\X+2,\X+1 


1707 










> «>|iitc«4 


«**i«(«>t<>i<i»>t' 




1708 


007376 


000012 






AT12: 


12 




TEST NUMBER 


1709 


007400 


007476 








AT13 




ADDRESS OF NEXT TEST 


1710 


007402 


000012 








10. 




ITERATION COUNT 


1711 


007404 


007406 








AOA 




SCOPE ENTRY POINT 


1712 




000012 








X=X+1 






1713 












Itllttitt**!)!*** 






1714 










•TEST 


THAT RXCSR BIT3 CAN BE SET 


CLEARED, AND THAT RESET CLEARS 


1715 


007406 


032777 


000010 


171774 


AOA: 


BIT 


#BIT3,@RXCSR 


SEE IF RXCSR BIT3 IS CLEAR. 


1716 


007414 


001402 








BEO 


AQB 


BRANCH IF BIT IS CLEAR. 


1717 


007416 


104003 








ERROR 




RESET DID NOT CLEAR RXCSR BITS 


1718 


007420 


000421 








BR 


AOD 




1719 


007422 


052777 


000010 


171760 


AOB: 


BIS 


#BIT3,@RXCSR 


SET RXCSR BIT3. 


1720 


007430 


032777 


000010 


171752 




BIT 


#BIT3,@RXCSR 


SEE IF BIT IS SET. 


1721 


007436 


001002 








BNE 


AOC 


BRANCH IF BIT IS SET. 


1722 


007440 


104003 








ERROR 




RXCSR BIT3 FAILED TO SET. 


1723 


007442 


000410 








BR 


AQD 




1724 


007444 


042777 


000010 


171736 


AOC: 


BIC 


#BIT3,@RXCSR 


CLEAR RXCSR BIT3 


1725 


007452 


032777 


000010 


171730 




BIT 


#BIT3,@RXCr" 


SEE IF BIT IS CLEAR. 


1726 


007460 


001401 








BEO 


AQD 




1727 


007462 


104003 








ERROR 




RXCSR BIT3 FAILED TO CLEAR. 


1728 


007464 


052777 


000010 


171716 


AQD: 


BIS 


#BIT3,@RXCSR 


SET RXCSR BIT3. 


1729 


007472 


104011 








SRESET 




ISSUE RESET TO CLEAR BIT. 


1730 


007474 


104012 








SCOPE 




SCOPE 


1731 


007476 










TSTA 


10.,AR,0 




1732 


007476 










TSTAA 


AR.IO. AX+1+0,\Xh 


h2,\X+1 


1733 












T^^m************** 




1734 


007476 


000013 






AT13: 


13 




TEST NUMBER 


1735 


007500 


007604 








AT14 




ADDRESS OF NEXT TEST 


1736 


007502 


000012 








10. 




ITERATION COUNT 


1737 


007504 


007506 








ARA 




SCOPE ENTRY POINT 


1738 




000013 








X = X+1 






1 739 
















1740 










•TEST 


THAT RXCSR BITS CAN BE SET 


CLEARED, AND THAT RESET CLEARS 


1741 


007506 


012737 


000340 


177776 


ARA: 


MOV 


#PRTY7,PSW 


PRTY7 TO INHIBIT ANY INT 


1742 


007514 


032777 


000040 


171666 




BIT 


#BIT5, ©RXCSR 


SEE IF RXCSR BITS IS CLEAR. 


1743 


007522 


001402 








BEO 


ARB 


BRANCH IF BIT IS CLEAR. 


1744 


007524 


104003 








ERROR 




RESET DID NOT CLEAR RXCSR BITS 


1745 


007526 


000421 








BR 


ARD 




1746 


007530 


052777 


000040 


171652 


ARB: 


BIS 


#BIT5,@RXCSR 


SET RXCSR BITS. 


1747 


007536 


032777 


000040 


171644 




BIT 


#BIT5,@RXCSR 


SEE IF BIT IS SET. 


1748 


007544 


001002 








BNE 


ARC 


BRANCH IF BIT IS SET. 


1749 


007546 


104003 








ERROR 




RXCSR BITS FAILED TO SET. 


1750 


007550 


000410 








BR 


ARD 




1751 


007552 


042777 


000040 


171630 


arc: 


BIC 


#BIT5,@RXCSR 


CLEAR RXCSR BITS 


1752 


007560 


032777 


000040 


171622 




BIT 


#BIT5,@RXCSR 


.SEE IF BIT IS CLEAR. 


1753 


007566 


001401 








BEQ 


ARD 




1754 


007570 


104003 








ERROR 




RXCSR BIT4 FAILED TO CLEAR. 


1755 


007572 


052777 


000040 


171610 


ARD: 


BIS 


^BITS.SisRXCSR 


.SET RXCSR BITS. 


1756 


007600 


104011 








SRESET 




•ISSUE RESET TO CLEAR BIT. 


1757 


007602 


104012 








SCOPE 




; SCOPE 


1758 


007604 










TSTA 


10., AS, CD 




1759 


007604 










TSTAA 


AS, 10. ,\X+1+CD,\ 


K+2,\X+1 


1760 















««««i!i>«!i!i««i(i«ii<«ii<i»>ti 



000if<tiif ********** 



l|l«««!«l)il««««I»#ltllil!)<4>ttl 



IT. 



4t««i»#i«E4i«««4i4i 



#lSl««««l«««««l«!t! 
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SEQ 0034 



1761 

1762 

1763 

1764 

1765 

1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

1776 

1777 

1778 

1779 

1780 

1781 

1782 

1783 

1784 

1785 

1786 

1787 

1788 

1789 

1790 

1791 

1792 

1793 

1794 

1795 

1796 

1797 

1798 

1799 

1800 

1801 

1802 

1803 

1804 

1805 

1806 

1807 

1808 

1809 

1810 

1811 

1812 

1813 

1814 

1815 

1816 



007604 
007606 
007610 
007612 



007614 
007622 
007630 
007632 
007634 
007636 
007644 
007652 
007654 
007656 
007660 
007666 
007674 
007676 
007700 
007706 
007710 
007712 
007712 

007712 
007714 
007716 
007720 



007722 
007730 
007732 
007734 
007736 
007740 
007740 

007740 
007742 
007744 
007746 



007750 
007756 
007760 
007762 
007764 
007766 
007766 



000340 
000100 



000100 
000100 



100014 
007712 
000012 
007614 
000014 



012737 

032777 

001402 

104003 

000421 

052777 

032777 

001002 

104003 

000410 

042777 000100 

032777 000100 

001401 

104003 

052777 

104011 

104012 



000015 
007740 
000144 
007722 
000015 



177776 
171560 



171544 
171536 



171522 
171514 



;TEST 
ASA: 



100014 
AT 15 
10. 
ASA 
X=X+1 

THAT RXCSR BIT6 CAN BE SET, CLEARED 



;TEST NUMBER 

; ADDRESS OF NEXT TEST 

; ITERATION COUNT 

; SCOPE ENTRY POINT 



000100 171502 ASD: 



AT15: 



MOV 

BIT 

BEQ 

ERROR 

BR 

BIS 

BIT 

BNE 

ERROR 

BR 

BIC 

BIT 

BEO 

ERROR 

BIS 

SRESET 

SCOPE 

TSTA 

TSTAA 



#PRTY7,PSW 

#BIT6,€»RXCSR 

ASB 

ASD 

*BIT6,@RXCSR 
#BIT6, ©RXCSR 
ASC 

ASD 

#BIT6, ©RXCSR 

#BIT6, ©RXCSR 

ASD 



AND THAT RESET CLEARS IT. 



;SET PRIORITY 7. 

;SEE IF RXCSR BIT6 IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

; RESET DID NOT CLEAR RXCSR BIT6 

;SET RXCSR BIT6. 
;SEE IF BIT IS SET. 
JBRANCH IF BIT IS SET. 
;RXCSR BIT6 FAILED TO SET. 

JCLEAR RXCSR BIT6 
;SEE IF BIT IS CLEAR. 



JRXCSR BITS FAILED TO CLEAR. 
#BIT6,@RXCSR ;SET RXCSR BIT6. 

; ISSUE RESET TO CLEAR BIT. 

; SCOPE 
100. ,AT,0 
AT , 1 00 . , \X+1 +0 , \X+2 , \X+1 

;TEST NUMBER 

; ADDRESS OF NEXT TEST 

ITERATION COUNT 

; SCOPE ENTRY POINT 



032777 000200 

001402 

104003 

104011 

104012 



000016 
007766 
000144 
007750 
000016 



;TEST 
ATA: 



AT16: 



15 

AT16 

100. 

ATA 

X=X+1 

THAT RXCSR BIT7 IS CLEAR AND CAN BE READ RELIABLY. 



«4i««««4i 



#BIT7, ©RXCSR 
ATB 



032777 
001402 
104003 
104011 
104012 



002000 171432 



JTEST 
AXA: 



BIT 

BEO 

ERROR 

SRESET 

SCOPE 

TSTA 

TSTAA 

16 

AT17 

100. 

AXA 

X=X+1 

******************* m*** ********** ****^**it,*******it^^ii,^^#^#^^^,),^^,^^^0^^^ 
THAT RXCSR BITIO IS CLEAR AND CAN BE READ RELIABLY. 



;SEE IF RXCSR BIT7 IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

; RXCSR BIT7 IS NOT CLEAR. 

JRESET IF ERROR 

; SCOPE 
100., AX, 
AX, 100. .\X+1+0,\X+2,\X+1 

« « « Ml « « « Kc « « « « 4, « 4c « « 4i 

;TEST NUMBER 
;ADDRESS OF NEXT TEST 
ITERATION COUNT 
; SCOPE ENTRY POINT 



**************,t:*^*0,f***i#<t,«tt,«,l,iit*i,ilf^0f^ 



BIT 

BEO 

ERROR 

SRESET 

SCOPE 

TSTA 

TSTAA 



#BIT10, ©RXCSR ;SEE IF RXCSR BITIO IS CLEAR. 
AXB {BRANCH IF BIT IS CLEAR. 

; RXCSR BITIO IS NOT CLEAR. 

; RESET BIT IF ERROR 

; SCOPE 
100., AY, CD 
AY,100.,\X+1+CD,\X+2,\X+1 
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SEQ 0035 



1817 






1818 


007766 


100017 


1819 


007770 


010014 


1820 


007772 


000144 


1821 


007774 


007776 


1822 




000017 


1823 






1824 






1825 


007776 


032777 


1826 


010004 


001402 


1827 


010006 


104003 


1828 


010010 


104011 


1829 


010012 


104012 


1830 


010014 




1831 


010014 




1832 






1833 


010014 


100020 


1834 


010016 


010042 


1835 


010020 


000144 


1836 


010022 


010024 


1837 




000020 


1838 






1839 






1840 


010024 


032777 


1841 


010032 


001402 


1842 


010034 


104003 


1843 


010036 


104011 


1844 


010040 


104012 


1845 


010042 




1846 


010042 




1847 






1848 


010042 


100021 


1849 


010044 


010070 


1850 


010046 


000144 


1851 


010050 


010052 


1852 




000021 


1853 






1854 






1855 


010052 


032777 


1856 


010060 


001402 


1857 


010062 


104003 


1858 


010064 


104011 


1859 


010066 


104012 


1860 






1861 






1862 






1863 






1864 






1865 






1866 


010070 




1867 


010070 




1868 






1869 


010070 


000022 


1870 


010072 


010154 


1871 


010074 


000144 


1872 


010076 


010100 



004000 171404 AYA 



• it,****ni**********#******** 
AT17: 100017 

AT20 

100. 

AYA 

XxX+1 ; 

•************************<f********)H0*#:^**^******rHl#*if0#im*^Hf*#^4t0#*###;^0ittl0i^0iti#l^^ 

JTEST THAT RXCSR BIT1 1 IS CLEAR AND CAN BE READ RELIABLY. 



****************************,^*0*m#0i^**,tf,if0iti««*'ti««i*i 
;TEST NUMBER 
; ADDRESS OF NEXT TEST 
•.ITERATION COUNT 
JSCOPE ENTRY POINT 



040000 171356 AZA: 



BIT #BIT11 , ©RXCSR ;SEE IF RXCSR BIT11 IS CLEAR 

BEO AYB ; BRANCH IF BIT IS CLEAR. 

ERROR ; RXCSR BIT11 IS NOT CLEAR. 

SRESET JRESET BIT IF ERROR 

AYB: SCOPE ; SCOPE 

TSTA 100.,AZ,CD 

TSTAA AZ,100.,\X+1+CD,\X+2,\X+1 
•0m****m******************* *************** 
AT20: 100020 ;TEST NUMBER 

AT21 jADDRESS OF NEXT TEST 

100. ; ITERATION COUNT 

AZA ; SCOPE ENTRY POINT 

X=X+1 ; 

'******************** **<f**************4i*i^it:*^rif****jif^,*iti:tt******mif*m'»'*#*^*m«*«>i'#^*<»* 
TEST THAT RXCSR BIT14 IS CLEAR AND CAN BE READ RELIABLY. 



*^*******************iii*rti*<*^t*it"»i*****#*# 



100000 171330 AAAA: 



AAAB: 



BIT #BIT14, ©RXCSR ;SEE IF RXCSR BIT14 IS CLEAR. 

BEQ AZB ; BRANCH IF BIT IS CLEAR. 

ERROR ; RXCSR BIT14 IS NOT CLEAR. 

SRESET ; RESET BIT IF ERROR 

AZB: scope ; scope 

TSTA 100., AAA, CD 

TSTAA AAA,100.,\X+1+CD,\X+2.\X-f1 

I *********************************** ******ylH,*****^,ii,**1tiitf*#***iti#,i,#4,0^#^#^f0D(^))i*i)t0#iii 

AT21: 100021 JTEST NUMBER 

AT22 ; ADDRESS OF NEXT TEST 

100. ; ITERATION COUNT 

AAAA ; SCOPE ENTRY POINT 

X=X+1 ; 

•************************^******<^****i)ll^**lt:n'^,:t!*i)l:**************l**1^)illlfj)IJ*J*1lill»m««*««ft'** 

TEST THAT RXCSR BIT15 IS CLEAR AND CAN BE READ RELIABLY. 



BIT #BIT15, ©RXCSR ;SEE IF RXCSR BIT15 IS CLEAR. 

BEO AAAB ; BRANCH IF BIT IS CLEAR. 

ERROR jRXCSR BIT15 IS NOT CLEAR. 

SRESET ;RESET BIT IF ERROR 

SCOPE ; SCOPE 



ALL PREVIOUS TESTS MUST HAVE BEEN RUN SUCCESSFULLY PRIOR ■ 

TO RUNNING THE FOLLOWING TESTS. ALSO, VHE JUMPER CONNECTOR 

MUST BE INSERTED IN THE DL11-E CABLE IN PLACE OF THE MODEM. COMMENTS 

REFER TO OPERATION WITH JUMPER INSERTED. 

TSTA 100.,AFB,0 

TSTAA AFB,100.,\X+1+0,\X+2,\X+1 

******************** **********m***********************it>*******«**0m*'iim0«^4"»*«*<i'^ 

T22: 22 ;TEST NUMBER 

AT23 ; ADDRESS OF NEXT TEST 

100. ; ITERATION COUNT 

AFBA ; SCOPE ENTRY POINT 
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SEQ 003@ 



1873 




000022 






1874 










1875 










1876 










1877 


010100 


052777 


000002 


171302 


1878 


010106 


004737 


011762 




1879 


010112 


032777 


010000 


171270 


1880 


010120 


001002 






1881 


010122 


104003 






1882 


010124 


000412 






1883 


010126 


042777 


000002 


171254 


1884 


010134 


004737 


011762 




1885 


010140 


032777 


010000 


171242 


1886 


010146 


001401 






1887 


010150 


104003 






1888 


010152 


104012 






1889 


010154 








1890 


010154 








1891 










1892 


010154 


000023 






1893 


010156 


010326 






1894 


010160 


000144 






1895 


010162 


010164 






1896 




000023 






1897 










1898 










1899 










1900 


010164 


042777 


000002 


171216 


1901 


010172 


004737 


011762 




1902 


010176 


017737 


171206 


001606 


1903 


010204 


032777 


100000 


171176 


1904 


010212 


001402 






1905 


010214 


104003 






1906 


010216 


000442 






1907 


010220 


052777 


000002 


171162 


1908 










1909 










1910 


010226 


004737 


011762 




1911 


010232 


017737 


171152 


001606 


1912 


010240 


032737 


100000 


001606 


1913 


010246 


001002 






1914 


010250 


104003 






1915 


010252 


000424 






1916 


010254 


032777 


100000 


171126 


1917 










1918 


010262 


001402 






1919 


010264 


104003 






1920 


010266 


000416 






1921 


010270 


042777 


000002 


171112 


1922 










1923 










1924 


010276 


004737 


011762 




1925 


010302 


017737 


171102 


001606 


1926 


010310 


032737 


100000 


001606 


1927 


010316 


001002 






1928 


010320 


104003 







XsX+1 ; 

'^!ii***iiit>fmiif^m********«***^ *************** *****************tifnf**00 
;TEST THAT CARRIER DETECT SETS AND CLEARS WHEN DATA TERMINAL 
JREAOY SETS AND CLEARS. 

;SET DATA TERMINAL READY 

; DELAY 

;TEST CARRIER DETECT 

; SHOULD BE SET 

; WASN'T 



AFBA: 



BIS 
USR 



AFBB: 



BNE 

ERROR 

BR 

BIC 

JSR 

BIT 

BEO 

ERROR 

SCOPE 

TSTA 

TSTAA 



#BIT1 ,®RXCSR 
%7,TIME 
#BIT12,®RXCSR 
AFBB 



AFBC 

#BIT1 ,@RXCSR 

%7,TIME 

#BIT12,@RXCSR 

AFBC 



; CLEAR DATA TERMINAL READY 

; DELAY 

;TEST CARRIER DETECT 

;WAS SET, ERROR 



'^***** 
AT23: 



*********4,i$,*«***iti^^i^ 



100..AGB,0 

AGB.IOO. .\X+1+0,\X+2,\X+1 

***«lHtt*tlt^li,IHl,******,llL*^H,,tl4lilf*H! 

;TEST NUMBER 
;ADDRESS OF NEXT TEST 
; ITERATION COUNT 
;SCOP.E ENTRY POINT 



«#««iti««««i$<iti 



23 

AT24 

100. 

AGBA 

X=X+1 ; 

• #***,if*iti^i***^c******m*****************************************)it#'»^#*9*i^iin»m**'if 
;TEST THAT MODEM INTERRUPT (BIT 15) SETS WHEN CARRIER DETECT 
jCHANGES STATE, AND IS CLEARED WHEN RXCSR IS READ. 



AGBA: 



BIC 


#BIT1 ,@RXCSR 


JSR 


%7,TIME 


MOV 


©RXCSR, RXCSRT 


BIT 


#BIT15,@RXCSR 


BEO 


AGBB 


ERROR 




BR 


AGBE 


BIS 


*BIT1 , ©RXCSR 


JSR 


%7,TIME 


MOV 


@RXCSR,RXCSRT 


BIT 


#BIT15,RXCSRT 


BNE 


A6BC 


ERROR 




BR 


AGBE 


BIT 


#BIT15, ©RXCSR 


BEO 


AGBD 


ERROR 




BR 


AGBE 


BIC 


#BIT1 , ©RXCSR 


JSR 


%7,TIME 


MOV 


©RXCSR, RXCSRT 


BIT 


<S'BIT15,RXCSRT 


BNE 


AGBE 


ERROR 





CLEAR DATA TERMINAL READY 

DELAY 

READ RXCSR 

TEST MODEM INTERRUPT 

WAS CLEAR GO TO AGBB 

WASN'T CLEAR 

GO TO SCOPE 

SETTING DATA TERMINAL READY 

CAUSES CARRIER DETECT TO SET 

WHICH CAUSES MODEM INTERRUPT TO SET 

DELAY 

MOVE RXCSR TO TEMPORARY LOCATION 

TEST MODEM INTERRUPT 

SHOULD BE SET GO TO AGBC 

WAS CLEAR 

GO TO SCOPE 

MODEM INTERRUPT BIT SHOULD 

HAVE BEEN CLEARED 

IT WAS GO TO AGBD 

IT WASN'T 

GO TO SCOPE 

CLEARING DATA TERMINAL READY 

CAUSES CARRIER DETECT TO CLEAR 

BUT MODEM INTERRUPT WILL SET 

DELAY 

MOV RXCSR TO TEMPORARY LOCATION 

TEST MODEM INTERRUPT 

SHOULD BE SET 

IT WASN'T 
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SEQ 0037 



1929 


010322 


000400 






1930 


010324 


104012 






1931 


010326 








1932 


010326 








1933 










1934 


010326 


000024 






1935 


010330 


01 0440 






1936 


010332 


000144 






1937 


010334 


010336 






1938 




000024 






1939 










1940 










1941 










1942 


010336 


042777 


000002 


171044 


1943 


010344 


004737 


011762 




1944 


010350 


032777 


020000 


171032 


1945 


010356 


001402 






1946 


010360 


104003 






1947 


010362 


000425 






1948 


010364 


052777 


000002 


171016 


1949 


010372 


004737 


011762 




1950 


010376 


032777 


020000 


171004 


1951 


010404 


001002 






1952 


010406 


104003 






1953 


010410 


000412 






1954 


010412 


042777 


000002 


170770 


1955 


010420 


004737 


011762 




1956 


010424 


032777 


020000 


170756 


1957 


010432 


001401 






1958 


010434 


104003 






1959 


010436 


104012 






1960 


010440 








1961 


010440 








1962 










1963 


010440 


000025 






1964 


010442 


010534 






1965 


010444 


000144 






1966 


010446 


010450 






1967 




000025 






1968 










1969 










1970 










1971 


010450 


042777 


000004 


170732 


1972 


010456 


004737 


011762 




1973 


010462 


052777 


000004 


170720 


1974 


010470 


004737 


011762 




1975 


010474 


032777 


040000 


170706 


1976 


010502 


001001 






1977 


010504 


104003 






1978 


010506 


042777 


000004 


170674 


1979 


010514 


004737 


011762 




1980 


010520 


032777 


040000 


170662 


1981 


010526 


001401 






1982 


010530 


104003 






1983 


010532 


104012 






1984 


010534 









BR AGBE 

SCOPE ; SCOPE 

TSTA 100.,AJB,0 

TSTAA AJB.IOO. ,\X+1+0,\X+2,\X+1 

*****************^Htl*****##1Hii),,t,^,^ti^^,lf^,),,tt 



AT24: 24 

AT25 
100. 
AJBA 
X = X+1 

•#***********************iti*********^,**:t:************#**********1»m 

;TEST THAT CLEAR TO SEND (BIT13) SETS/CLEARS WHEN DATA TERMINAL 
JREADY SETS/CLEARS. 



4i«««i|iiti«i)i4iitiiti4ii«i«««««4>«iti«i««ii>«*4i«««4iiti 



TEST NUMBER 
ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



!«!«««« ««ltll«l««l«l«$«« 



BIC 

JSR 

BIT 

BEQ 

ERROR 

BR 

BIS 

JSR 

BIT 

BNE 

ERROR 

BR 

BIC 

JSR 

BIT 

BEQ 

ERROR 

SCOPE 

TSTA 

TSTAA 



#BIT1 ,@RXCSR 
%7,TIME 
#BIT13,@RXCSR 
AJBB 

AJBD 

#BIT1 ,@RXCSR 

%7,TIME 

#BIT13,u:RXCSR 

AJBC 

AJBD 

#BIT1 , ©RXCSR 

%7,TIME 

#BIT13, ©RXCSR 

AJBD 



; CLEAR DATA TERMINAL READY 

; DELAY 

;TEST CLEAR TO SEND 

; CLEAR TO SEND SHOULD BE CLEAR 

;SET DATA TERMINAL READY 

; DELAY 

;TEST CLEAR TO SEND 

; BRANCH IF SET 

; CLEAR TO SEND SHOULD BE SET 

; CLEAR DATA TERMINAL READY 

; DELAY 

-.TEST CLEAR TO SEND 



• « « « « Id « « 



AT25: 



; CLEAR TO SEND SHOULD BE CLEAR 

; SCOPE 
100.,AKB.0 
AKB.IOO. ,\X+1+0,\X+2,\X+1 

****** ******,^*i,****^^,^*it,,^iti0,imni,it,,ff0i^^ 
;TEST NUMBER 
; ADDRESS OF NEXT TEST 
; ITERATION COUNT 
; SCOPE ENTRY POINT 



********* **^iti*,it^, 

25 

AT26 

100. 

AKBA 

X=X+1 

I **************** ********************#*****#***^*it,it,**4,^0,^^^^^^,f,,i, 
;TEST THAT RING (BIT 14 RXCoR) SETS WHEN REQUEST TO 
JSEND SETS AND CLEARS AND RESET CLEARS RING 
AKBA: 



mmn"»nii*i^i¥«0^***0** 



4i««i«««««i(i«« «««««« 



BIC 


#BIT2, ©RXCSR 


; CLEAR REQUEST TO SEND 


JSR 


%7,TIME 


; DELAY 


BIS 


#BIT2, ©RXCSR 


;SET REQUEST TO SEND 


JSR 


%7,TIME 


; DELAY 


BIT 


#BIT14, ©RXCSR 


;TEST RING 


BNE 


AKBC 




ERROR 




;RING SHOULD BE SET 


BIC 


#BIT2, ©RXCSR 


; CLEAR REQUEST TO SEND 


JSR 


%7,TIME 


; DELAY 


BIT 


<^BIT14, ©RXCSR 


;TEST RING 


BEQ 


.+4 


; SHOULD BE CLEAR 


ERROR 






SCOPE 




; SCOPE 


TSTA 


100.,AOB,0 





.MAIN. MACYII 30A(1052) 30-MAR-78 08:S2 PAGE 38 
C2DLAG.P11 30-MAR-78 08:51 



SiQ 603@ 



1985 

1986 

1987 

1988 

1989 

1990 

1991 

1992 

1993 

1994 

1995 

1996 

1997 

1998 

1999 

2000 

2001 

2002 

2003 

2004 

2005 

2006 

2007 

2008 

2009 

2010 

2011 

2012 

2013 

2014 

2015 

2016 

2017 

2018 

2019 

2020 

2021 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 

2030 

2031 

2032 

2033 

2034 

2035 

2036 

2037 

2038 

2039 

2040 



010534 

010534 
010536 
010540 
010542 



010544 
010552 
010556 
010564 
010566 
010570 
010572 
010600 
010604 
010612 
010614 
010616 
010620 
010626 
010632 
010640 
010642 
010644 
010646 
010646 

010646 
010650 
010552 
010654 



010656 
010664 
010670 
010676 
010700 
010702 
010704 
010712 
010716 
010724 
010726 
010730 
010732 
010740 
010744 
010752 
010754 
010756 



000026 
010646 
000144 
010544 
000026 



042777 
004737 
032777 
001402 
104003 
000425 
052777 
004737 
032777 
001002 
104003 
000412 
042777 
004737 
032777 
001401 
104003 
104012 



000027 
010760 
000144 
010656 
000027 



042777 
004737 
032777 
001402 
104003 
000425 
052777 
004737 
032777 
001002 
104003 
000412 
042777 
004737 
032777 
001401 
104003 
104012 



000004 
011762 
100000 



000004 
011762 
100000 



000004 
011762 
100000 



000010 
011762 
002000 



000010 
011762 
002000 



000010 
011762 
002000 



170636 
170624 



170610 
170576 



170562 
170550 



170524 
170512 



170476 
170464 



170450 
170436 



AT26: 



JTEST 
AOBA: 



TSTAA AOB,100.,\X-H+0,\X+2.\X+1 

26 ;TEST NUMBER 

AT27 ; ADDRESS OF NEXT TEST 

100. ; ITERATION COUNT 

AOBA ;SCOPE ENTRY POINT 

X=X+1 ; 



^4'i»^*^!^ii!ii^Mniiiii«mt»00tiit»if^!»^^^t)i^^#iit 



***** 



>t!*I**** 



THAT MODEM INTERRUPT (BIT 15 RXCSR) SETS WHEN RING SETS. 



4<**Di**«*«4i*«4,«,»«i«94i«,j,«i4,««4,««4,4,4, 



BIC 
JSR 

BIT 

BEQ 

ERROR 

BR 

BIS 

JSR 

BIT 

BNE 

ERROR 

BR 

BIC 

JSR 

BIT 

BEO 

ERROR 

SCOPE 

TSTA 

TSTAA 

A^i*****: 

27 

AT30 
100. 
ALBA 
X = X+1 

lO 4c>tr :tc * 4i 4t • 



#BIT2,@RXCSR 
%7,TIME 
#BIT15,@RXCSR 
AOBB 

AOBD 

#BIT2,@>RXCSR 
%7,TIME 
#BIT15, ©RXCSR 
AOBC 

AOBD 

#BIT2, ©RXCSR 

%7,TIME 

#BIT15,@RXCSR 

AOBD 



;CLEAR REQUEST TO SEND 

; DELAY 

;TEST MODEM INTERRUPT BIT 



;SET REQUEST TO SEND 

; DELAY 

;TEST MODEM INTERRUPT BIT 



;CLEAR REQUEST TO SEND 

; DELAY 

;TEST MODEM INTERRUPT BIT 



100. ,ALB,0 

ALB, 100. ,\X+1+0,\X-i-2AX+1 



:t[«iK****** 



;TEST NUMBER 
JADDRESS OF NEXT TEST 
; ITERATION COUNT 
;SCOPE ENTRY POINT 



**>t<*i«i**4<,|i««4i««4,4,«4, 1^4,1^^,^4,1^4,1^4,4, 



TEST 

WHEN 

alba: 



THAT SUPERVISORY RECEIVE DATA (BIT 10 RXCSR) SETS/CLEARS 
SUPERVISORY XMIT DATA SETS/CLEARS. 



**«*4,««4,«4,4,4, 4,4, «,(, 4,4, 4,4, 4,4, 4,4, 4,4,4,4,4,4,,^ 



BIC 
JSR 

BIT 

BEQ 

ERROR 

BR 

BIS 

JSR 

BIT 

BNE 

ERROR 

BR 

BIC 

JSR 

BIT 

BEQ 

ERROR 

SCOPE 



#BIT3,@RXCSR 
%7,TIME 
#BIT10, ©RXCSR 
ALBB 

ALBD 

#BIT3,i>RXCSR 
%7,TIME 
#BIT10, ©RXCSR 
ALBC 

ALBD 

#BIT3,@RXCSR 

%7,TIME 

#BIT10,#RXCSR 

ALBD 



;CLEAR SUPERVISOR XMIT DATA 

;DELAY 

;TEST SUPERVISORY RECEIVE DATA. 

; SHOULD HAVE BEEN CLEAR 

;SET SUPERVISORY XMIT DATA 

JDELAY 

;TEST SUPERVISORY RECEIVE DATA 

; SHOULD HAVE BEEN SET 

;CLEAR SUPERVISORY XMIT DATA 

; DELAY 

;TEST SUPERVISORY RECEIVE DATA 

; SHOULD HAVE BEEN CLEAR 
; SCOPE 
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SEQ 0039 



2041 
2042 
2043 
2044 
2045 
2046 
2047 
2048 
2049 
2050 
2051 
2052 
2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
2062 
2063 
2064 
2065 
2066 
2067 
2068 
2069 
2070 
2071 
2072 
2073 
2074 
2075 
2076 
2077 
2078 
2079 
2080 
2081 
2082 
2083 
2084 
2085 
2086 
2087 
2088 
2089 
2090 
2091 
2092 
2093 
2094 
2095 
2096 



010760 
010760 

010760 
010762 
010764 
010766 



010770 
010776 
011002 
011010 
011014 
011022 
011024 
011026 
011030 
01 1036 
01 1040 
011042 
011044 
011052 
011056 
011064 
011066 
011070 
011072 
011100 
011104 
011112 
011114 
011116 
011120 
011120 

011120 
011122 
011124 
011126 



011130 
011136 
011144 
011146 
011154 
011156 
011164 
011172 
011176 
011200 
011202 
011204 



000030 
01 1120 
000144 
010770 
000030 



042777 
004737 
052777 
004737 
032777 
001002 
104003 
000433 
032777 
001402 
104003 
000425 
042777 
004737 
032777 
001002 
104003 
000412 
052777 
004737 
032777 
001001 
104003 
104012 



100031 
011224 
000012 
01 1130 
000031 



012737 
012777 
104011 
022777 
001422 
017737 
012737 
004537 
001616 
015442 
000006 
004537 



000010 
011762 
000010 
011762 
100000 



000010 
011762 
100000 



000010 
011762 
100000 



000340 
177777 



170232 
000200 
004474 



AT30: 



TSTA 
TSTAA 

30 
AT31 
100. 
AMBA 
X = X+1 



100.,AMB,0 
AMB.IOO. ,\X+1+0, 

****i(iiK**)X*i|>*****4 



\X+2,\X+1 

4:«itci(c4citt«*«>t:Kiif*****itc**«4i**>i<***4!*«4itti4i>»i«4<*4!4>4i«i4<* 

TEST NUMBER 
ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



170412 
170400 
170366 



;»>tc**>ti****«**«****************«********************«******4<«4i«««*«<i4ii»*i«!««4i4t>ti 

-.TEST THAT SUP REC DATA TRANSISTIONS SET MODEM INTERRUPT 
AMBA: BIC #BIT3,@RXCSR ;CLEAR SUP REC 

; DELAY 

;SET SUP REC 

; DELAY 

;TEST MODEM INTERRUPT 

;MODEM INTERRUPT SHOULD BE SET 



100000 170352 AMBB: 



170336 
170324 



170310 
170276 



BIC 

JSR 

BIS 

JSR 

BIT 

BNE 

ERROR 

BR 

BIT 

BEQ 

ERROR 

BR 

BIC 

JSR 

BIT 

BNE 

ERROR 

BR 

BIS 

JSR 

BIT 

BNE 

ERROR 

SCOPE 

TSTA 

TSTAA 



#BIT3,@RXCSR 

%7,TIME 

#BIT3,@RXCSR 

%7,TIME 

#BIT15,#RXCSR 

AMBB 



AMBE 

#BIT15, ©RXCSR 

AMBC 

AMBE 

#BIT3,@RXCSR 

%7,TIME 

#BITl5,i>RXCSR 

AMBD 

AMBE. 

#BIT3, ©RXCSR 

%7,TIME 

#BIT15,@RXCSR 

AMBE 



;MODEM INTERRUPT SHOULD BE 
;CLEARED BY PREVIOUS READ 



;1-0 TRANS OF SUP REC DATA 

;DELAY 

;TEST MODEM INTERRUPT 

; SHOULD BE SET 



0-1 TRANS OF SUP REC DATA 

DELAY 

TEST MODEM INTERRUPT 

SHOULD BE SET 



177776 
170250 



;****>! 

;TEST 
ABAA: 



10., ABA, CD 

ABA, 10. ,\X+1+CD, 

**************4!*********** 

100031 

AT32 

10. 

ABAA 

X=X+1 

THAT RESET CLEARS ALL TXCS 



000200 170240 



001604 
001616 



MOV 

MOV 

SRESET 

CMP 

BEQ 

MOV 

MOV 

JSR 

TEMP 

ATXSB 

6 

JSR 



#PRTY7,PSW 
#-1 ,@TXCSR 

#BIT7,f>TXCSR 
ABAB 

@TXCSR,TXCSRT 
#8^7, TEMP 
%5,0ACNV 



%5,0ACNV 



\X+2,\X+1 

4c>ti************************)«i**«*««<«>i»*««««««4!««4i«>«* 

;TEST NUMBER * 

;ADDRESS OF NEXT TEST * 

ITERATION COUNT * 

;SCOPE ENTRY POINT * 

; * 

*^Lm**)H** ******** *****^********'li"»'»*i»T»<i:'*iii'»t»0'n*n'«<i'if* 

R BITS, AND SETS BIT 7 (READY) 

;SET PRIORITY 7. 

;SET ALL POSSIBLE BITS IN TXCSR 

; ISSUE RESET TO CLEAR BITS 

;SEE IF ONLY BIT 7 IS SET. 

; BRANCH IF ONLY BIT 7 IS SET 

;SAVE CONTENTS OF TXCSR 

;MOVE EXPECTED TXCSR TO TEMP. 

;G0 TO OCTAL TO ASCII CONVERT. 

; SOURCE ADDR. 

;DESTINATION ADDR. 

;#0F DIGITS TO CONVERT. 

;G0 TO OCTAL TO ASCII CONVERT. 



,) 



.MAIN. MACY11 30A(1052) 30-MAR-7a 03552 PAGE 40 
C2DLAG,P11 30-MAR-78 08:51 

TXCSRT 
ATXWAS 
6 

ERR0R1 
ATXCSR 
3: SCOPE 
TSTA 
TSTAA 



SEO 0040 



2097 


011210 


001604 






2098 


011212 


015457 






2099 


011214 


000006 






2100 


011216 


104015 






2101 


011220 


015427 






2102 


011222 


104012 






2103 


011224 








2104 


011224 








2105 










2106 


011224 


000032 






2107 


011226 


01 1374 






2108 


011230 


000012 






2109 


011232 


01 1234 






2110 




000032 






2111 










2112 










2113 










2114 


011234 


012737 


oJO>,';o 


177776 


2115 


01 1242 


042777 


000002 


170140 


2116 


011250 


012777 


177777 


170132 


2117 


011256 


052777 


000004 


170130 


21 18 


011264 


005077 


170126 




2119 


011270 


104020 






2120 


01 1272 


104003 






2121 


011274 


012777 


000001 


170114 


2122 


011302 


104017 






2123 


011304 


104003 






2124 


01 1306 


104011 






2125 


011310 


017737 


170074 


001606 


2126 


011316 


022737 


030002 


001606 


2127 


011324 


001417 






2128 


011326 


012737 


030002 


001616 


2129 


011334 


004537 


004474 




2130 


011340 


001616 






2131 


011342 


015501 






2132 


011344 


000006 






2133 


011346 


004537 


004474 




2134 


011352 


001606 






2135 


011354 


015516 






213S 


011356 


000006 






2137 


011360 


104015 






2138 


011362 


015466 






2139 


011364 


042777 


000002 


170016 


2140 


011372 


104012 






2141 


011374 








2142 


011374 








2143 










2144 


011374 


100033 






2145 


011376 


01 1454 






2146 


011400 


000012 






2147 


011402 


01 1404 






2148 




000033 






2149 










2150 










2151 










2152 


011404 


005077 


170006 





SOURCE ADDR. 

DESTINATION ADDR. 

#0F DIGITS TO CONVERT. 

RESET FAILED TO CLEAR ALL BITS EXCEPT 

BIT 7 - SEE PRINTOUT 

SCOPE 



32 

AT33 

10. 



10. ,ACA,0 

ACA , 1 . , \X+1 +0 , \X+2 , \X+ 1 

#>)<♦♦**>»■***************♦**** 

TEST NUMBER 



«<**«#♦«**♦***»*** *t*** 



«i « « i$i « i$t >» 



ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



*,!,******«*«*********«>**« 



ACAA: 



ACAA 
X=X+1 

JtEST THAT RESET CLEARS ALL RXCSR BITS EXCEPT DATA TERMINAL READY. RING 

jCLEAR TO SEND, CARRIER DET 

- -SET PRIORITY 7 

JCLEAR DATA TERM. READY 

;SET ALL POSSIBLE BITS IN RXCSR 

;SET MAINT BIT 

;TRANSMIT A CHAR 

;TIME OUT TX DONE 

; ERROR DONE NOT SETTING 

;TRANSMIT ANOTHER CHAR. 

;TIME OUT RX DONE 

; ERROR DONE NOT SETTING 

; ISSUE RESET TO CLEAR BITS. 

;MOVE RXCSR CONTENTS TO RXCSRT 

;SEE IF ONLY BITS 1,12,13 SET 

;BRANCH IF ONLY BITS 1,12,13 SET. 



ACAB: 



AT33: 



MOV 


#PRTY7,PSW 


BIC 


#BIT1 .@RXCSR 


MOV 


#-1 , ©RXCSR 


BIS 


#4,@TXCSR 


CLR 


©TXBUF 


TIMETX 




ERROR 




MOV 


#1 ,®TXBUF 


TIMERX 




ERROR 




SRESET 




MOV 


©RXCSR, RXCSRT 


CMP 


#30002, RXCSRT 


BEO 


ACAB 


MOV 


#30002, TEMP 


JSR 


%5,0ACNV 


TEMP 




ARXSB 




6 




USR 


%5,0ACNV 


RXCSRT 




ARXWAS 




6 




ERR0R1 




ARXCSR 




BIC 


#BIT1 .(PRXCSR 


SCOPE 




TSTA 


10., ADA, CD 


TSTAA 


ADA, 10. ,\X+1+ 



;G0 TO OCTAL TO ASCII CONVERT. 

; SOURCE ADDR. 

jDESTINATION ADDR. 

;#0F DIGITS TO CONVERT. 

;G0 TO OCTAL TO ASCII CONVERT. 

;SOURCE ADDR. 

;DESTINATION ADDR. 

;#0F DIGITS TO CONVERT. 

; RESET FAILED TO CLEAR ALL BITS EXCEPT 

;BIT 0. SEE ERROR PRINTOUT. 

jCLEAR DATA TERM. READY 

; SCOPE 
. , ADA, CD 
A, 10. ,\X+1+CD,\X+2,\X+. 

100033 ;TEST NUMBER 

AT34 ; ADDRESS OF NEXT TEST 

10. ; ITERATION COUNT 

ADAA ; SCOPE ENTRY POINT 

x=x+i ; 

************************************************************************ 

TEST THAT LOADING TXBUF (TRANSMITTER BUFFER) CLEARS TXCSR BIT 7 (READY) 
AND WITHOUT MAINT SET THAT TXDONE SETS READY 
ADAA: CLR ©TXBUF ; LOAD TXBUF 



******************************** 



iti4i«««««« 
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SEQ 0041 



2153 


01 1410 


104020 




2154 


011412 


104003 




2155 


01 1414 


005077 


167776 


2156 


011420 


105777 


167770 


2157 


011424 


100002 




2158 


011426 


104003 




2159 


01 1430 


000407 




2160 


011432 


104020 




2161 


011434 


104003 




2162 


011436 


032777 


000200 167750 


2163 


011444 


001001 




2164 


01 1446 


104003 




2165 


011450 


104011 




2166 


011452 


104012 




2167 


011454 






2168 


01 1454 






2169 








2170 


011454 


100034 




2171 


011456 


01 1776 




2172 


011460 


000001 




2173 


011462 


01 1464 




2174 




000034 




2175 








2176 








2177 








2178 


011464 


004737 


006216 


2179 


011470 


104001 




2180 


011472 


016764 




2181 


011474 


017012 




2182 


011476 


017274 




2183 


011500 


177777 




2184 


011502 


000000 




2185 


011504 


004737 


011712 


2186 


011510 


013737 


011774 001564 


2187 


011516 


104-000 




2188 


011520 


017304 




2189 


011522 


000000 




2190 


011524 


004737 


011712 


2191 


011530 


013737 


011774 001566 


2192 


011536 


104000 




2193 


011540 


017314 




2194 


011542 


000000 




2195 


011544 


004737 


011712 


2196 


011550 


013737 


011774 001570 


2197 


011556 


104000 




2198 


011560 


017324 




2199 


011562 


000000 




2200 


011564 


004737 


011712 


2201 


011570 


013737 


011774 001572 


2202 


011576 


104000 




2203 


011600 


017334 




2204 


011602 


000000 




2205 


011604 


004737 


011712 


2206 


011610 


013737 


011774 001574 


2207 


011616 


104000 




2208 


011620 


017344 





;TIME OUT TX DONE 

; ERROR, DONE NOT SETTING 

; LOAD TX BUF 

;TEST TXCSR BIT 7 (READY BIT) 

; BRANCH IF BIT NOT SET. 

; ERROR. LOADING TXBUF FAILED TO CLEAR READY. 

;WAIT FOR DONE 
;DONE NEVER SET 



; READY DID NOT SET 

; SCOPE. 

\X+2,\X+1 

(I*********************************** ******** 
;TEST NUMBER 
; ADDRESS OF NEXT TEST 
; ITERATION COUNT 
;SCOPE ENTRY POINT 
X=X+1 ; 
• ■I,***************************************************************** ******** 
;TEST THAT TRANSMIT SPEEDS ARE ARRANGED IN ASCENDING ORDER BY CHECKING THAT 
;T0 READY BIT (TXCSR BIT 7) DECREASES AS A HIGHER SPEED IS SELECTED. 
;TEST IF THIS TEST SELECTED 



TIMETX 




ERROR 




CLR 


PTXBUF 


TSTB 


©TXCSR 


BPL 


ADAB 


ERROR 




BR 


ADAC 


TIMETX 




ERROR 




BIT 


#BIT7, ©TXCSR 


BNE 


.+4 


ERROR 




SRESET 




SCOPE 




TSTA 


1.,AIA,CD 


TSTAA 


AIA.I .,\X+1+ 


DC « * 4: »( « « 




100034 




AT35 




AIAA 





«i«i]ti#«4< 



TIME 



USR 


%7.D0THIS 


TYPES 




MSETTX 




MSETC 




MSO 




HALT 




USR 


%7,AIAS 


MOV 


AIAST,CTRO 


TYPE 




MSI 




HALT 




USR 


%7,AIAS 


MOV 


AIAST.CTRI 


TYPE 




MS2 




HALT 




USR 


%7,AIAS 


MOV 


AIAST,CTR2 


TYPE 




MS3 




HALT 




USR 


%7,AIAS 


MOV 


AIAST.CTRS 


TYPE 




MS4 




HALT 




USR 


%7,AIAS 


MOV 


AIAST,CTR4 


TYPE 




MS5 





JOUTPUT CHAR AND TIME. 
;MOVE ELAPSED TIME TO CTRO. 



;OUTPUT CHAR AND TIME. 
;MOVE ELAPSED TIME TO CTRL 



•.OUTPUT CHAR AND TIME. 
;MOVE ELAPSED TIME TO CTR2. 



JOUTPUT CHAR AND TIME. 
;MOVE ELAPSED TIME TO CTR3. 



; OUTPUT CHAR AND TIME 
;MOVE ELAPSED TIME TO CTR4 
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SEQ 0043 



2209 


011622 


000000 




2210 


011624 


004737 


011712 


2211 


011630 


013737 


011774 001576 


2212 


011636 


104000 




2213 


011640 


017354 




2214 


011642 


000000 




2215 


011644 


004737 


011712 


2216 


011650 


013737 


011774 001600 


2217 


011656 


104000 




2218 


011660 


017364 




2219 


011662 


000000 




2220 


011664 


004737 


011712 


2221 


011670 


013737 


011774 001602 


2222 


011676 


004737 


014424 


2223 


011702 


000402 




2224 


011704 


104015 




2225 


011706 


015526 




2226 


011710 


104012 




2227 








2228 


011712 


005037 


011774 


2229 


011716 


105777 


167472 


2230 


011722 


100375 




2231 


011724 


005077 


167466 


2232 


011730 


105777 


167460 


2233 


011734 


100375 




2234 


011736 


005077 


167454 


2235 


011742 


004737 


011762 


2236 


011746 


005237 


011774 


2237 


011752 


105777 


167436 


2238 


011756 


100371 




2239 


011760 


000207 




2240 








2241 


011762 


012700 


000017 


2242 


011766 


005300 




2243 


011770 


001376 




2244 


011772 


000207 




2245 


011774 


000000 




2246 


011776 






2247 


011776 






2248 








2249 


011776 


000035 




2250 


012000 


012052 




2251 


012002 


000012 




2252 


012004 


012006 




2253 




000035 




2254 








2255 








2256 








2257 








2258 








2259 


012006 


052777 


000004 167400 


2260 


012014 


005077 


167376 


2261 


012020 


104016 




2262 


012022 


000764 




2263 


012024 


105777 


167360 


2264 


012030 


100402 





time: 
TIMi: 



HALT 

JSR 

MOV 

TYPE 

MS6 

HALT 

JSR 

MOV 

TYPE 

MS7 

HALT 

JSR 

MOV 

JSR 

BR 

ERR0R1 

ETXTIM 

SCOPE 

CLR 

TSTB 

BPL 

CLR 

TSTB 

BPL 

CLR 

JSR 

INC 

TSTB 

BPL 

RTS 



MOV 
DEC 
BNE 
RTS 
AIAST: OPEN 
TSTA 
TSTAA 

AT35: 



%7,AIAS 
AIAST, CTR5 



K7,AIAS 
AIAST, CTR6 



%7,AIAS 
AIAST, CTR7 
%7,CWPT 
AIAF 



AIAST 

PTXCSR 

.-4 

©TXBUF 

@TXCSR 

.-4 

©TXBUF 

%7,TIME 

AIAST 

PTXCSR 

A I ASA 

%7 

#15., %0 
%0 
TIMI 
%7 



;OUTPUT CHAR AND TIME 
;MOVE ELAPSED TIME TO CTR5 



; OUTPUT CHAR AND TIME 
;MOVE ELAPSED TIME TO CTR6 



JOUTPUT CHAR AND TIME 

;MOVE ELAPSED TIME TO CTR7 

; CHECK THAT CTRO THROUGH CTR7 CONTAIN 

; DESCENDING VALUES 

; TRANSMIT SPEEDS NOT ARRANGED IN 

; ASCENDING ORDER. 

; SCOPE 

-.CLEAR ELAPSED TIME COUNTER. 
JWAIT FOR TX READY. 



;LOAD TXBUF. 

;WAIT 75 US 

INCREMENT ELAPSED TIME COUNTER. 

; READY SET? 

; BRANCH IF READY NOT SET. 

;EXIT. 



nt< * « >t< iK )«t it! « >«< « « « 

35 
AT36 



10., ALA. 
ALA.10..\X+1+0,\X+2,\X+1 

" '*************************************««**♦♦««****»««*«««« 

;TEST NUMBER 

; ADDRESS OF NEXT TEST 
'"• ITERATION COUNT 

ALAA ; SCOPE ENTRY POINT 

X=X+1 ; 

!!!!*!************************************♦***♦*****♦********♦****•*♦*♦««**««« 

I!!J..I!?'^I °IJTPUTTING A CHARACTER WITH THE MAINTENANCE BIT SET (TXCSR BIT 2) 
RESULTS IN DONE BIT SETTING (RXCSR BIT 7) NO LATER THAN 500 MSECS ANQ 
THAT RESET INSTRUCTION CLEARS THE DONE BIT ' ^^° 



A LA a: 



BIS 

CLR 

DELAY 

500. 

TSTB ©RXCSR 

BMI A LAB 



#BIT2,@TXCSR ;SET MAINTENANCE BIT 

S'TXBUF ;LOAD TXBUF 

JWAIT 500 MSECS. 

;SEE IF DONE BIT IS SET 
; BRANCH IF DONE BIT IS SET 
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SEQ 0043 



2265 


012032 


104003 




2266 


012034 


000405 




2267 


012036 


104011 




2268 


012040 


105777 


167344 


2269 


012044 


100001 




2270 


012046 


104003 




2271 


012050 


104012 




2272 


012052 






2273 


012052 






2274 








2275 


012052 


100036 




2276 


012054 


012116 




2277 


012056 


000144 




2278 


012060 


012062 




2279 




000036 




2280 








2281 








2282 








2283 


012062 


052777 


000004 


2284 


012070 


005077 


167322 


2285 


012074 


104017 




2286 


012076 


104003 




2287 


012100 


005777 


167306 


2288 


012104 


105777 


167300 


2289 


012110 


100001 




2290 


012112 


104003 




2291 


012114 


104012 




2292 


012116 






2293 


012116 






2294 








2295 


012116 


100037 




2296 


012120 


012226 




2297 


012122 


000144 




2298 


012124 


012132 




2299 




000037 




2300 








2301 








2302 








2303 


012126 


004737 


002706 


2304 


012132 


052777 


000004 


2305 


012140 


005077 


167252 


2306 


012144 


005037 


001616 


2307 


012150 


032777 


004000 


2308 


012156 


001402 




2309 


012160 


005237 


001616 


2310 


012164 


105777 


167220 


2311 


012170 


100367 




2312 


012172 


023727 


001616 


2313 


012200 


001002 




2314 


012202 


104003 




2315 


012204 


000405 




2316 


012206 


032777 


004000 


2317 


012214 


001401 




2318 


012216 


104003 




2319 


012220 


005777 


167166 


2320 


012224 


104012 





alab: 



A LAC: 



AT36: 



ERROR 

BR 

SRESET 

TSTB 

BPL 

ERROR 

SCOPE 

TSTA 

TSTAA 



A LAC 



JDONE BIT FAILED TO SET 



©RXCSR 
A LAC 



; ISSUE RESET TO CLEAR DONE BIT 
;SEE IF DONE BIT IS CLEARED 
; BRANCH IF DONE BIT IS CLEARED 
; RESET FAILED TO CLEAR DONE BIT 
; SCOPE 

100.,AMA,CD 

AMA , 1 00 . , \X-m-CD , \X+2 , \X+ 1 

{TEST NUMBER 
JADDRESS OF NEXT TEST 
ITERATION COUNT 
;SCOPE ENTRY POINT 



I* *♦♦«*«*♦♦»♦#«» ***^**«ll^,J^,^^S(,^^ 



1 67324 AMAA 



AMAC: 



100036 
AT37 
100. 
AMAA 
X = X+1 



BIS 

CLR 

TIMERX 

ERROR 

TST 

TSTB 

BPL 

ERROR 

SCOPE 

TSTA 

TSTAA 



#BIT2,@TXCSR 
©TXBUF 



@RXBUF 
©RXCSR 
AMAC 



100..A0A.CD 

AOA , 1 00 . . \X-H +CD , \X+2 , \X+1 



;SET MAINTENANCE BIT (TXCSR BIT 2) 

;LOAD TXBUF 

;WAIT FOR DONE BIT TO SET. 

JREAD RXBUF TO CLEAR DONE BIT 

;SEE IF DONE BIT IS CLEAR 

; BRANCH IF DONE BIT IS CLEAR 

; READING RXBUF FAILED TO CLEAR DONE BIT 

{SCOPE 



******#******^*^##^^^^^^-^^^^^^ 



AT37 



;TEST NUMBER 
{ADDRESS OF NEXT TEST 
{ITERATION COUNT 
{SCOPE ENTRY POINT 



100037 

AT40 

100. 

AOAA 

XsX+1 - 

{TEST THAT RECEIVER ACTIVE SETS WHEN CHAR STARTS AND 
{CLEARS WHEN RECEIVER DONE SETS 



««««#««««««« 



167254 AOAA: 



167232 AOAB: 



AOABl : 



aoac: 



aoad: 



JSR 

BIS 

CLR 

CLR 

BIT 

BEQ 

INC 

TSTB 

BPL 

CMP 

BNE 

ERROR 

BR 

BIT 

BEQ 

ERROR 

TST 

SCOPE 



%7,CDINIT 

#BIT2,@TXC.«=R 

©TXBUF 

TEMP 

#BIT11, ©RXCSR 

AOABl 

TEMP 

©RXCSR 

AOAB 

TEMP,#0 

AOAC 

AOAD 

*BIT11. ©RXCSR 

AOAD 

©RXBUF 



{INIT IF C-D DEVICE 
{SET MAINT 
{TRANSMIT CHAR 
{CLEAR BUSY INDICATOR 
{IS RECEIVER ACTIVE SET 
{BRANCH IF CLEAR 
{YES. REMEMBER THAT 
{SEE IF JONE SET 

{DID RECEIVER ACTIVE SET 

{RECEIVER ACTIVE NEVER SET 

{DID DONE CLEAR ACTIVE 

{NO, RECEIVER ACTIVE DID NOT CLEAR 
{CLEAR RX DONE 
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SEQ 0044 



2321 

2322 

2323 

2324 

2325 

2326 

2327 

2328 

2329 

2330 

2331 

2332 

2333 

2334 

2335 

2336 

2337 

2338 

2339 

2340 

2341 

2342 

2343 

2344 

2345 

2346 

2347 

2348 

2349 

2350 

2351 

2352 

2353 

2354 

2355 

2356 

2357 

2358 

2359 

2360 

2361 

2362 

2363 

2364 

2365 

2366 

2367 

2368 

2369 

2370 

2371 

2372 

2373 



012226 
012226 

012226 
012230 
012232 
012234 



012236 
012242 
012244 
012246 
012250 
012252 
012254 
012256 
012262 
012270 
012272 
012274 
012276 
012302 
012310 
012312 
012314 
012316 
012322 
012330 
012332 
012334 
012336 
012342 
012350 
012352 
012354 
012356 
012362 
012370 
012372 
012374 
012376 
012402 
012410 
012412 
012414 
012416 
012422 



000040 
012530 
000001 
012236 
000040 



AT40: 



>)t«]4<>t>9««!»««4i«««4iiiiiti««i)!i»«4i«««««i«« 



004737 
104001 
016736 
017012 
017274 
177777 
000000 
004737 
013737 
104000 
017304 
000000 
004737 
013737 
104000 
017314 
000000 
004737 
013737 
104000 
017324 
000000 
004737 
013737 
104000 
017334 
000000 
004737 
013737 
104000 
017344 
000000 
004737 
013737 
104000 
017354 
000000 
004737 
013737 



012464 
012526 



012464 
012526 



012464 
012526 



012464 
012526 



012464 
012526 



012464 
012526 



012464 
012526 



TSTA L.AOA.O 

TSTAA AQA,1.,\X+1+0,\X+2,\X-H 

40 ;TEST NUMBER 

AT41 ;ADDRESS OF NEXT TEST 

1 . ; ITERATION COUNT 

AOAA ; SCOPE ENTRY POINT 

X=X+1 ; 

JTEST THAT RECEIVE SPEEDS ARE ARRANGED IN ASCENDING ORDER BY CHECKING THAT TIME 
jELAPSED TO DONE BIT SETTING (RXCSR BIT 7) DECREASES AS A HIGHER SPEED 
;THIS IS NOT DONE IN MAINTENANCE MODE TX AND RX 
;POTS MUST BE STEPPED TOGETHER 
;IS SELECTED. 

; CHECK IF THIS TEST TO BE DONE 



;OUTPUT CHARACTER AND TIME DONE BIT 
;MOVE ELAPSED TIME TO CTRO 



AQAA: 



JSR 


X7,D0THIS 


TYPES 




MSETRX 




MSETC 




MSO 




HALT 




USR 


%7,A0AS 


MOV 


AOAST.CTRO 


TYPE 




MSI 




HALT 




JSR 


%7,A0AS 


MOV 


AQAST.CTRI 


TYPE 




MS2 




HALT 




JSR 


%7,A0AS 


MOV 


AQAST,CTR2 


TYPE 




MS3 




HALT 




JSR 


%7,A0AS 


MOV 


A0AST,CTR3 


TYPE 




MS4 




HALT 




JSR 


%7,A0AS 


MOV 


A0AST,CTR4 


TYPE 




MS5 




HALT 




JSR 


%7,A0AS 


MOV 


AQAST.CTRB 


TYPE 




MS6 




HALT 




JSR 


%7,A0AS 


MOV 


AQAST.CTRB 



; OUTPUT CHARACTER AND TIME DONE BIT 
JMOVE ELAPSED TIME TO CTR1 



JOUTPUT CHARACTER AND TIME DONE BIT. 
;MOVE ELAPSED TIME TO CTR2. 



; OUTPUT CHARACTER AND TIME DONE BIT 
jMOVE ELAPSED TIME TO CTR3. 
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SEQ 004S 



2374 
2375 
2376 
2377 
2378 
2379 
2380 
2381 
2382 
2383 
2384 
2385 
2386 
2387 
2388 
2389 
2390 
2391 
2392 
2393 
2394 
2395 
2396 
2397 
2398 
2399 
2400 
2401 
2402 
2403 
2404 
2405 
2406 
2407 
2408 
2409 
2410 
2411 
2412 
2413 
2414 
2415 
2416 
2417 
2418 
2419 
2420 
2421 
2422 
2423 
2424 
2425 
2426 
2427 
2428 
2429 



012430 104000 
012432 017364 
012434 000000 
012436 004737 012464 
013737 



012442 

012450 004737 

012454 000402 

012456 104015 

012460 015570 

012462 104012 



012526 
014424 



012464 
012470 
012474 
012476 
012502 
012506 
012512 
012516 
012522 
012524 
012526 
012530 
012530 

012530 
012532 
012534 
012536 



012540 
012544 
012550 
012556 
012564 
012566 
012570 
012572 
012576 
012600 
012602 
012604 

012612 
012614 
012616 
012620 
012624 
012632 
012634 
012636 
012640 
012646 
012650 



005037 012526 

105777 166720 

100375 

005777 166710 

005077 166710 

004737 011762 

005237 012526 

105777 166666 

100371 

000207 

000000 



100041 
012674 
000012 
012540 
000041 



004737 
004737 
017737 
032737 
001002 
104003 
104012 
005737 
100402 
104003 
104012 
032777 

001002 
104003 
104012 
004737 
032777 
001402 
104003 
104012 
032777 
001401 
104003 



012654 
012654 
166636 
040000 



AQAB: 
AQAS: 



TYPE 

MS7 

HALT 

JSR 

MOV 

JSR 

BR 

ERR0R1 

ERXTIM 

SCOPE 

CLR 

TSTB 

BPL 

TST 

CLR 

JSR 

INC 

TSTB 

BPL 

RTS 

OPEN 

TSTA 

TSTAA 

100041 

AT42 

10. 

ARAA 

X=X+1 



567, AQAS 
A0AST,CTR7 
%7,CMPT 
AQAB 



AQAST 

©TXCSR 

.-4 

@RXBUF 

©TXBUF 

%7,TIME 

AQAST 

©RXCSR 

AQASA 

%7 

10.,ARA,CD 
ARA,10.,\X+1+CD, 



001610 
001610 



040000 166600 



012654 
100000 



040000 166544 



;i)lit>!«!le!|i*l|t*4iltr:itlitli{i 

;TEST CORRECT 
ARAA: JSR 
JSR 
MOV 
BIT 
BNE 
ERROR 
SCOPE 
TST 
BMI 
ERROR 
SCOPE 
BIT 

BNE 

ERROR 

SCOPE 

JSR 

BIT 

BEQ 

ERROR 

SCOPE 

BIT 

BEQ 

ERROR 



OPERATION OF DATA 
%7,ARAS 
%7,ARAS 
StRXBUF.RXBUFT 
#BIT14,RXBUFT 
.+6 



RXBUFT 
.+6 



#BIT14,©RXBUF 



%7,ARAS 

iS'BITIB.eRXBUF 

.+6 



#BIT14,®RXBUF 
.+4 



; CHECK THAT CTRO THROUGH CTR3 CONTAIN 

; DESCENDING VALUES. 

; RECEIVE SPEEDS NOT ARRANGED IN 

;ASCENDING ORDER. 

; SCOPE 

; CLEAR ELAPSED TIME COUNTER AQAST 
;WAIT FOR TX READY. 

JCLEAR DONE BIT IF SET 
JLOAD TXBUF 

INCREMENT ELAPSED TIME COUNTER 

;DONE SET? 

{BRANCH IF DONE NOT SET 

;EXIT 

; ELAPSED TIME COUNTER 

\X+2.\X+1 

TEST NUMBER ♦ 

ADDRESS OF NEXT TEST ♦ 

ITERATION COUNT * 

SCOPE ENTRY POINT ♦ 

« 

OVERRUN BIT (RXBUF BIT 14) 
JOUTPUT CHARACTER AND WAIT 500 MSECS 
JOUTPUT CHARACTER AND WAIT yOO MSECS 
;SAVE RXBUF CONTENTS + CLEAR DONE 
JSEE IF DATA OVERRUN BIT WAS SET 
; BRANCH IF BIT WAS SET 



;SEE THAT ERROR BIT WAS SET (RXBUF BIT 15) 

; ERROR BIT FAILED TO SET WHEN OVERRUN SET 

;SEE THAT DATA OVERRUN WAS NOT 

; CLEARED WHEN RXBUF WAS READ 

; BRANCH IF SET 

; READING RXBUF CLEARED DATA OVERRUN 



; OUTPUT CHAR +WAIT BOOMS 
;TEST THAT ERROR CLEARED 



;TEST THAT OVERRUN CLEARED 
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SEQ 004@ 



2430 
2431 
2432 
2433 
2434 
2435 
2436 
2437 
2438 
2439 
2440 
2441 
2442 
2443 
2444 
2445 
2446 
2447 
2448 
2449 
2450 
2451 
2452 
2453 
2454 
2455 
2456 
2457 
2458 
2459 
2460 
2461 
2462 
2463 
2464 
2465 
2466 
2467 
2468 
2469 
2470 
2471 
2472 
2473 
2474 
2475 
2476 
2477 
2478 
2479 
2480 
2481 
2482 
2483 
2484 
2485 



012652 
012654 
012662 
012666 
012670 
012672 
012674 
012674 

012674 
012676 
012700 
012702 



012704 
012710 
012712 
012714 
012722 
012726 
012734 
012736 
012740 
012746 
012750 
012756 
012760 
012762 
012762 

012762 
012764 
012766 
012770 



012772 
012774 
012776 
013004 
013012 
013020 
013022 
013030 
013032 
013034 
013036 
013040 
013040 



104012 
052777 
005077 
104016 
000764 
000207 



100042 
012762 
000012 
012714 
000042 



004737 
104007 
012750 
042777 
005037 
052777 
000240 
104003 
042777 
104012 
042777 
022626 
000772 



100043 
013040 
001750 
012776 
000043 



104007 
013032 
013737 
042777 
052777 
000240 
042777 
104012 
022626 
104003 
000771 



000004 
166530 



166532 ARAS: 



SCOPE 




SCOPE 


BIS 


#BIT2,@TXCSR 


SET fyiAINTENANCE BIT 


CLR 


@TXBUF 


LOAD TXBUF 


DELAY 




DELAY 500 MSECS 


500. 






RTS 


%7 


EXIT 


TSTA 


10., ATA. CD 




TSTAA 


ATA, 10. ,\X+1+CD,\X+2,\X+1 


^,«4<>t<*«4 


HLHt,il7(^JHt4:t^,^itti^t^l1^*iti)Hll^:ili^**>^^ti^**^*******'****>i' 


100042 




TEST NUMBER 


AT43 




ADDRESS OF NEXT TEST 


10. 




ITERATION COUNT 


AT A A 




SCOPE ENTRY POINT 


X=X+1 







TEST THAT TRANSMITTER IS ABLE TO INTERRUPT. 
IT WILL HAVE OCCURRED AT THE CORRECT VECTOR. 



I************ »*«****«!*«***« 



IF THE INTERRUPT IS SERVICED, 



) 



000100 
177776 
000100 



166472 
166460 

166446 
166436 



ATAB: 
ATAC: 



USR 

STTXV 

ATAC 

BIC 

CLR 

BIS 

NOP 

ERROR 

BIC 

SCOPE 

BIC 

P0PSP2 

BR 

TSTA 

TSTAA 

100043 
AT44 
1000. 
AUAA 
X = X+1 



#BIT6,@TXCSR 

PSW 

#BIT6,@TXCSR 



#BIT6,@TXCSR 



#BIT6,@TXCSR 



;G0 TO OVER LAY ROUTINE 

•,SET TX INTERRUPT SERVICE 

;T0 ATAC 

;DISABLE TX INTERRUPT 

;SET PROCESSOR PRIORITY TO 

; ENABLE TX INTERRUPT 

; READY DID NOT CAUSE AN INTERRUPT 

; SCOPE 

;HERE IF INT, DISABLE TX INT 



ATAB 

1000. .AUA.CD 

AUA , 1 000 . , \X+1 +CD , \X+2 . \X+1 

TEST NUMBER 



4<:tt>|i>|citi«>ii«Dt4<4i«««4<ii<««4>«*«««i(i!t<<4<4><l<4<4<4!>|i4! 



ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



•TEST THAT READY DOES NOT CAUSE AN INTERRUPT WHEN THE PROCESSOR IS 
;AT the SAME PRIORITY AS The TRANSMITTER INTERRUPT REQUEST LEVEL 

STTXV - - ^- 

AUAC 



001426 
000100 
000100 



177776 
166402 
166374 



000100 166364 



AUAB: 
AUAC: 



MOV 

BIC 

BIS 

NOP 

BIC 

SCOPE 

P0PSP2 

ERROR 

BR 

TSTA 

TSTAA 



TXLVL.PSW 

#BIT6,i>TXCSR 

#BIT6,®TXCSR 

#BIT6,f>TXCSR 



•,SET TX INTERRUPT SERVICE TO 

;SET PROCESSOR PRIORITY SAME AS TX PRIORITY 



; ENABLE VX INTERRUPTS 



DISABLE INTERRUPTS 



013040 100044 



AUAB 

10.,AVA,CD 

AVA.IO. .\X+1+CD,\X+2.\X+1 

100044 JTEST NUMBER 



OK IF NO INTERRUPT OCCURS. 

SCOPE 

HERE IF INTERRUPT OCCURS. POP STOCK TWICE 

TX INTERRUPTED WITH PROCESSOR AT SAME 

PRIORITY AS THE TRANSMITTER 



4.>»:««>)<.|i««it>«««<4>««>)<i»s«>««««««*«#««i«<*l<4><S>««<>l>« 
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SEQ 0047 



2486 
2487 
2488 
2489 
2490 
2491 
2492 
2493 
2494 
2495 
2496 
2497 
2498 
2499 
2500 
2501 
2502 
2503 
2504 
2505 
2506 
2507 
2508 
2509 
2510 
2511 
2512 
2513 
2514 
2515 
2516 
2517 
2518 
2519 
2520 
2521 
2522 
2523 
2524 
2525 
2526 
2527 
2528 
2529 
2530 
2531 
2532 
2533 
2534 
2535 
2536 
2537 
2538 
2539 
2540 
2541 



013042 
013044 
013046 



013050 
013052 
013054 
013062 
013070 
013076 
013104 
013106 
0131 10 
0131 12 
013114 
013122 
013124 
013124 

013124 
013126 
013130 
013132 



013134 
013136 
013140 
013146 
013152 
013160 
013162 
013164 
013172 
013174 
013202 
013206 
013210 
013212 
013214 
013216 
013220 
013222 
013222 

013222 
013224 
013226 
013230 



013124 
000012 
013054 
000044 



104007 
0131 12 
042777 
013737 
162737 
052777 
000240 
104003 
000401 
022626 
042777 
104012 



100045 
013222 
000144 
013134 
000045 



104007 
013174 
042777 
005037 
052777 
000240 
104003 
042777 
104012 
012777 
012716 
000002 
000240 
000764 
022626 
104003 
000761 



100046 
013306 
000012 
013246 
000046 



AT45 
10. 
AVAA 
X = X+1 



ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



TEST THAT TRANSMITTER INTERRUPTS WHEN PROCESSOR IS AT PRIORITY ONE LEVEL 
LOWER THAN THE TRANSMITTER INTERRUPT PRIORITY. 



000100 
001426 
000040 
000100 



166332 
177776 
177776 
166310 



000100 166272 



AVAB: 
AVAC: 



000100 
177776 
000100 



013214 
013210 



STTXV 

AVAB 

BIC 

MOV 

SUB 

BIS 

NOP 

ERROR 

BR 

P0PSP2 

BIC 

SCOPE 

TSTA 

TSTAA 

100045 
AT46 
100. 
AWAA 
X = X+1 



#BIT6,@TXCSR 
TXLVL.PSW 
#40, PSW 
#BIT6,@TXCSR 



#BIT6,@TXCSR 



100. ,AWA,CD 

AWA.IOO. ,\)> 1+CD,\X+2.\X+1 

t^itf*************************** 
TEST NUMBER 



;SET TX INTERRUPT SERVICE TO AVAB 

;DISABLE TX INTERRUPTS 

•,SET PROCESSOR PRIORITY TO ONE LEVEL 

; LOWER THAN TX PRIORITY 

; ENABLE TX INTERRUPTS 

,-TX FAILED TO INTERRUPT 

;HERE IF INTERRUPT OCCURS. POP STOCK TWICE 
;DISABLE TX INTERRUPTS 
; SCOPE 



!|of(«4iit<iti*«4«««>i<ii<>ti>|ci«iii>««««4ii»««i9>i(ii|t4<««i(>: 



ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE E-ITRY POINT 



166246 
166234 

166222 
166222 



TEST THAT TRANSMITTER DOES NOT REINTERRUPT AFTER THE INITIAL INTERRUPT HAS 
OCCURRED AND HAS BEEN SERVICED. 

;SET TX INTERRUPT SERVICE TO AWAC 

;DISABLE TX INTERRUPTS 

;SET PROCESSOR PRIORITY TO 

; ENABLE TX INTERRUPTS 

JTRANSMITTER FAILED TO INTERRUPT 

;DISABLE TX INTERRUPTS 

; SCOPE 

;HERE IF INTERRUPT OCCURS. CHANGE EXIT 

; POINTER TO AWAD AND EXIT INTERRUPT 

;0K IF NO INTERRUPT REOCCURS. 

;HERE IF INTERRUPT REOCCURS 
;TX REINTERRUPTED AFTER RTI 



**,if*i>i*ri,,t,^m>*it!m***<titii**^m*^0>nii*iiiiit'*** *##**'(> 



STTXV 




AWAC 




BIC 


#BIT6,§>TXCSR 


CLR 


PSW 


BIS 


#BIT6,@TXCSR 


NOP 




ERROR 




BIC 


#BIT6,@TXCSR 


SCOPE 




MOV 


#AWAE,(i!TXVTR 


MOV 


#AWAD,@%6 


RTI 




NOP 




BR 


AWAB 


P0PSP2 




ERROR 




BR 


AWAB 


TSTA 


10. .AXA.CD 


TSTAA 


AXA,10.,\X+1- 



• #it,,fm** ********** *******<f<¥* 
AT46: 100046 

AT47 

10. 

AXAA 

X=X+1 
'nf^*<t**#,i,***}ti4tm****** *******************************>»**** *>¥^**!¥>»*iti'»***<^**'«'*'*»'t' 



;TEST NUMBER 
;ADDRESS OF NEXT TEST 
; ITERATION COUNT 
; SCOPE ENTRY POINT 
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SiQ 004S 



2542 
2543 
2544 
2545 
2546 
2547 
2548 
2549 
2550 
2551 
2552 
2553 
2554 
2555 
2556 
2557 
2558 
2559 
2560 
2561 
2562 
2563 
2564 
2565 
2566 
2567 
2568 
2569 
2570 
2571 
2572 
2573 
2574 
2575 
2576 
2577 
2578 
2579 
2530 
2581 
2582 
2583 
2584 
2585 
2586 
2587 
2588 
2589 
2590 
2591 
2592 
2593 
2594 
2595 
2596 
2597 



013232 
013236 
013240 
013242 
013246 
013254 
013260 
013266 
013270 
013272 
013274 
013276 
013304 
01330^ 
013306 

013306 
013310 
013312 
013314 



013316 
013322 
013324 
013326 
013334 
013340 
013346 
013350 
013352 
013354 
013356 
013360 
013366 
013370 
013370 

013370 
013372 
013374 
013376 



013400 
013402 
013404 
013410 
013416 
013424 



004737 
104006 
013274 
004737 
042777 
005037 
052777 
000240 
104003 
000401 
022626 
042777 
104012 



000047 
013370 
000012 
013326 
000047 



004737 
104006 
013356 
042777 
005037 
052777 
104016 
000005 
104003 
000401 
022626 
042777 
104012 



100050 
013452 
001750 
013410 
000050 



104006 
013444 
004737 
042777 
013737 
052777 



;TEST 
;SERVI 



THAT RECEIVER DONE Bl f IS ABLE TO INTERRUPT. IF THE INTERRUPT IS 
CED IT WILL HAVE OCCURRED AT THE CORRECT VECTOR. 



014404 
000100 
177776 
000100 



166134 
166122 



000100 166104 



AXAB: 
AXAC: 



AT47: 



dSR 

STRXV 

AXAB 

dSR 

BIC 

CLR 

BIS 

NOP 

ERROR 

BR 

P0PSP2 

BIC 

SCOPE 

TSTA 

TSTAA 



%7,STRXD 
#BIT6,@RXCSR 
PSW 
#BIT6,@RXCSR 



AfBITB.iPRXCSR 



;G0 TO OVERLAY ROUTINE 

;SET RX INTERRUPT SERIVCE TO AXAB 

;SET RX uONE BIT 
;DISABLE RX INTERRUPTS 
;SET PROCESSOR PRIORITY TO 
; ENABLE RX INTERRUPTS 

;RX FAILED TO INTERRUPT 

;HERE IF INTERRUPT OCCURS 
;DISABLE INT EN 
; SCOPE 



47 

AT50 
10. 
AX1A 
X = X+1 



10. ,AX1 ,0 

AX1 ,10. ,\X+1+0,\X+2.\X+1 

TEST NUMBER 



«>3l«««>itl)<!»««««1«!«!»««4ll|<«««>»!««4>l»>|l4< 



ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



***** 

TEST 

SERVI 



**]|iiK*****it< ************************ ***************i|i«**«:4iiti#4i«4iiti«i»ri»!ii 

THAT MODEM INTERRUPT BIT IS ABLE TO INTERRUPT. IF THE INTERRUPT IS 
CED IT WILL HAVE OCCURRED AT THE CORRECT VECTOR. 



000044 
177776 
000044 



166054 
166042 



000040 166022 



AXIB: 
AX1C: 



JSR 

STRXV 

AXIB 

BIC 

CLR 

BIS 

DELAY 

5. 

ERROR 

BR 

P0PSP2 

BIC 

SCOPE 

TSTA 

TSTAA 



#44,@RXCSR 

PSW 

#44,@RXCSR 



#BIT5,@RXCSR 



;G0 TO OVERLAY ROUTINE 

;SET RX INTERRUPT SERIVCE TO AXAB 

;DISABLE MODEM INTERRUPTS 
;SET PROCESSOR PRIORITY TO 
;ENABLE MODEM INTERRUPTS , RQ TO SND 



; MODEM FAILED TO INTERRUPT 



;HERE IF INTERRUPT OCCURS 
;DISABLE INT EN 



TEST 
IS AT 



1000. .AYA.CD 

AYA.IOOO. ,\X+1+CD,\X+2,\X+1 

********************************************************* ***>!ii»***Ui*i«** 

100050 
AT51 
1000. 
AYAA 
X = X+1 

>K***>X***«*****,tc********************************************l|l*«***l«l|l1«l4c<«l 

THAT RECEIVER DONE BIT DOES NOT CAUSE AN INTERRUPT WHEN THE PROCESSOR 
THE SAME PRIORITY LEVEL AS THE RECEIVER INTERRUPT REQUEST LEVEL 



TEST NUMBER 
ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



014404 
000100 
001422 
000100 



165772 
177776 
165756 



STRXV 

AYAC 

JSR 

BIC 

MOV 

BIS 



;SET RX INTERRUPT SERVICE TO AYAC 

%7,STRXD ;SET RX DONE BIT 

#BIT6,@RXCSR jDISABLE RX INTERRUPTS 

RXLVL.PSW ;SET PROCESSOR PRIORITY SAME AS RECEIVER'S 

#BIT6,®RXCSR ; ENABLE RX INTERRUPTS 
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SEQ 0049 



2598 
2599 
2600 
2601 
2602 
2603 
2604 
2605 
2606 
2607 
2608 
2609 
2610 
2611 
2612 
2613 
2614 
2615 
2616 
2617 
2618 
2619 
2620 
2621 
2622 
2623 
2624 
2625 
2626 
2627 
2628 
2629 
2630 
2631 
2632 
2633 
2634 
2635 
2636 
2637 
2638 
2639 
2640 
2641 
2642 
2643 
2644 
2645 
2646 
2647 
2648 
2649 
2650 
2651 
2652 
2653 



013432 
013434 
013442 
013444 
013446 
013450 
013452 
013452 

013452 
013454 
013456 
013460 



013462 
013464 
013466 
013472 
013500 
013506 
013514 
013522 
013524 
013526 
013530 
013532 
013540 
013542 
013542 

013542 
013544 
013546 
013550 



013552 
013556 
013560 
013562 
013570 
013576 
013600 
013602 
013610 
013612 
013620 
013624 
013626 
013630 
013632 



000240 
042777 
104012 
022626 
104003 
000771 



100051 
013542 
000012 
013472 
000051 



104006 
013530 
004737 
042777 
013737 
162737 
052777 
000240 
104003 
000401 
022626 
042777 
104012 



100052 
013640 
000144 
013556 
000052 



004737 
104006 
013612 
042777 
052777 
000240 
104003 
042777 
104012 
012777 
012716 
000002 
000240 
000764 
022626 



000100 165746 AYAB: 



014404 
000100 
001422 
000040 
000100 



000100 
000100 



013632 
013626 



165710 
177776 
177776 
165666 



000100 165650 



165620 
165612 



165600 
165600 



NOP 

BIC 

SCOPE 

P0PSP2 

ERROR 

BR 

TSTA 

TSTAA 

100051 
AT52 
10. 
AZAA 
X = X+1 



#BIT6,@RXCSR ;0K IF NO INTERRUPT. DISABLE RX INTERRUPTS 
; SCOPE 

;HERE IF INTERRUPT OCCURS. POP STOCK TWICE 
;RX INTERRUPTED WITH PROCESOR AT SAME 

AYAB ;PRIORITY AS THE RECEIVER 

10. .AZA.CD 

AZA,10. ,\X+1+CD,\X+2,\X+1 

TEST NUMBER 
ADDRESS OF NEXT TEST 
ITERATION COUNT 
SCOPE ENTRY POINT 



:***«>|iiit*#«««)ei«4i#*«i4t««iSi4!«:«< 



************«*****lt<*****:4!************4:*>tc***********************«l|l«*«Dt«l|l4l!(l*ltl« 

TEST THAT RECEIVER DONE BIT CAUSES INTERRUPT WHEN PROCESSOR IS AT PRIORITY 
ONE LEVEL LOWER THAN THE RECEIVER'S INTERRUPT REQUEST LEVEL 



AZAB: 
AZAC: 



STRXV 

AZAB 

JSR 

BIC 

MOV 

SUB 

BIS 

NOP 

ERROR 

BR 

P0PSP2 

BIC 

SCOPE 

TSTA 

TSTAA 



;SET RX INTERRUPT TO AZAB 

%7,STRXD ;SET RX DONE BIT 

#BIT6,@RXCSR ;DISABLE RX INTERRUPTS 

RXLVL.PSW ;SET PROCESSOR PRIORITY ONE LEVEL 

#40, PSW -.LOWER THAN RECEIVER'S PRIORITY 

#BIT6.@RXCSR ;ENABLE RX INTERRUPTS 

;RX FAILED TO INTERRUPT WITH PROCESSOR AT 
AZAC ; PRIORITY ONE LEVEL LOWER THAN RECEIVER'S 

;HERE IF INTERRUPT OCCURS 
#BIT6.f>RXCSR JDISABLE RX INTERRUPTS 

; SCOPE 
100. .AAB.CD 
AAB.IOO. ,\X+1+CD,\X+2.\X+1 

K*****i|c******************«** 

;TEST NUMBER 
;ADDRESS OF NEXT TEST 
; ITERATION COUNT 
;SCOPE ENTRY POINT 



AT52: 100052 
AT53 
100. 
AABA 
X=X+1 ; 

;*******************«********«*******************«********»:**>|>**«««!*iii«««««s(ii4ii3t 

;TEST THAT RECEIVER DOES NOT INTERRUPT AFTER THE INITIAL INTERRUPT HAS 
JOCCURED AND DONE BIT HAS NjT BEEN CLEARED 

;SET RX DONE BIT 
AABA: STRXV ;SET RX INTERRUPT SERVICE TO AABC 

;DISABLE RX INTERRUPTS 
; ENABLE ;<X INTERRUPTS 

;RX FAILED TO INTERRUPT 

JDISABLE RX INTERRUPTS 

; SCOPE 

;HERE IF INTERRUPT OCCURS. CHANGE SERVICE TO 

;AABE. SET EXIT POINTER TO AABD 

;EXIT INTERRUPT SERVICE 

;0K IF NO INTERRUPT REOCCURS 

;HERE IF INTERRUPT REOCCURS 



JSR 


%7,STRXD 


STRXV 




AABC 




BIC 


#BIT6,®RXCSR 


BIS 


#BIT6,@RXCSR 


NOP 




ERROR 




BIC 


#BIT6,@RXCSR 


SCOPE 




MOV 


#AABE,®RXVTR 


MOV 


#AABD,(?%6 


RTI 




NOP 




BR 


AABS 


P0PSP2 
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SEQ OOSO 



2654 

2655 

2656 

2657 

2658 

2659 

2660 

2661 

2662 

2663 

2664 

2665 

2666 

2667 

2668 

2669 

2670 

2671 

2672 

2673 

2674 

2675 

2676 

2677 

2678 

2679 

2680 

2681 

2682 

2683 

2684 

2685 

2686 

2687 

2688 

2689 

2690 

2691 

2692 

2693 

2694 

2695 

2696 

2697 

2698 

2699 

2700 

2701 

2702 

2703 

2704 

2705 

2706 

2707 

2708 

2709 



013634 
013636 
013640 
013640 

013640 
013642 
013644 
013646 



013650 
013654 
013662 
013666 
013670 
013672 
013676 
013700 
013700 

013700 
013702 
013704 
013706 



013710 
013712 
013714 
013720 
013724 
013732 
013736 
013744 
013746 
013750 
013752 
013754 
013762 
013764 
013764 

013764 
013766 
013770 
013772 



104003 
000761 



100053 
013700 
000144 
013650 
000053 



004737 014404 

017737 165530 

105777 165522 

100401 

104003 

005777 165514 

104012 



100054 
013764 
000144 
013714 
000054 



104006 

013752 

004737 014404 

004737 014404 

042777 000100 

005037 177776 

052777 000100 

000240 

104003 

000401 

022626 

042777 

104012 



ERROR 
BR 

TSTA 
TSTAA 

AT53: 100053 
AT54 
100. 
ABBA 
XsX+1 

;****♦***♦******♦♦***********♦********«****«* **#******#*«***#**«***»*«,**#»***«»4, 

-TEST THAT READING RXCSR DOES NOT CLEAR DONE BIT (RXCSR BIT 7 ) 
"°" "*" X7,STRXD ;SET RX DONE BIT 

@RXCSR,RXCSRT ;SAVE CONTENT OF RXCSR 

^R><CSR ;SEE IF DONE BIT IS CLEAR 

ABBB ; BRANCH IF DONE BIT IS NOT CLEAR 



;RX REINTERRUPTEO AFTER RTl 
AABB 

100. .ABB. CD 
ABB.100.,\X+1+CD,\X4-2.\X+1 

**************** *********************#*#*i****«**it,*«*««««#«**«*4,*, 
;TEST NUMBER 
; ADDRESS OF NEXT TEST 
ITERATION COUNT 
; SCOPE ENTRY POINT 



ABBA: 



ABBB: 



JSR 
MOV 
TSTB 
BMI 
ERROR 
TST 
SCOPE 
TSTA 
TSTAA 
;***#*«*******, 

AT54: 100054 
AT55 
100. 
ACBA 
X=X+1 

;TEST THAT DONE CAN CAUSE INT WITH ERROR SET 



©RXBUF JCLEAR DONE BIT IF SET 

; SCOPE 
100.,ACB,CD 
ACB,100.,\Xt-1+CD,\X+2,\X+1 

*«**♦****♦** **«*****-**#***^^^^*^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^_j_ 

;TEST NUMBER * 

; ADDRESS OF NEXT TEST « 

; ITERATION COUNT * 

; SCOPE E.-^TRY POINT * 

' * 

**********«****4,*4i«:j,«$i(,4,iji^,j,^^^^,|, 



165456 
165444 



000100 165426 



ACBB: 
ACBC: 



STRXV 

ACBB 

USR 

JSR 

BIC 

CLR 

BIS 

NOP 

ERROR 

BR 

P0PSP2 

BIC 

SCOPE 

TSTA 

TSTAA 



%7.STRXD 

%7,STRXD 

#BIT6,@RXCSR 

PSW 

#BIT6.i>RXCSR 



ACBC 

#BIT6. ©RXCSR 



;SET RX INTERRUPT SERVICE TO ACBB. 

;SET RX DONE BIT 
;SET RX DATA OFLOW 
JDISABLE RX INTERRUPTS 
;SET PROCESSOR PRIORITY TO 
; ENABLE RX INTERRUPTS 

;RX DONE FAILED TO CAUSE INTERRUPT 

;HERE IF INTERRUPT OCCURS. POP STOCK TWICE 



100055 
014006 
000003 
014000 
000055 



******#«*********4,*«i^«:^^ 411^41^1^^4,1^^^^, 



013774 
014000 
014004 
014006 



004737 002706 
004537 004770 
104012 



3., ADD. CD 

ADD. 3. .\X+1+CD.\X+2.\X+1 
;********** ***#*^fm**,i,if*******m'i'* ******* ****,f 
AT55: 100055 ;TEST NUMBER 

AT56 ; ADDRESS OF NEXT TEST 

3. ; ITERATION COUNT 

ADDA ; SCOPE ENTRY POINT 

X=X+1 ; 

',******************************** *****^**^*#ii,**^#^^^^^^j^^^^^^^^^^^^^^^^^^^^^^^^^ 
JDATA TEST USING NORMAL CONFIGURATION 

JSR %7,CDINIT UNIT IF C-D DEVICE 
ADDA: JSR 5,DATTST 

SCOPE 

TSTA 3.,APB,0 
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SEQ 0051 



2710 

2711 

2712 

2713 

2714 

2715 

2716 

2717 

2718 

2719 

2720 

2721 

2722 

2723 

2724 

2725 

2726 

2727 

2728 

2729 

2730 

2731 

2732 

2733 

2734 

2735 

2736 

2737 

2738 

2739 

2740 

2741 

2742 

2743 

2744 

2745 

2746 

2747 

2748 

2749 

2750 

2751 

2752 

2753 

2754 

2755 

2756 

2757 

2758 

2759 

2760 

2761 

2762 

2763 

2764 

2765 



014006 

014006 
014010 
014012 
014014 



014016 
014022 
014030 
014032 
014034 
014040 
014044 
014050 
014054 
014056 
014060 
014066 
014070 
014074 
014076 
014100 
014100 

014100 
014102 
014104 
014106 



TSTAA APB,3. 



******* 



014110 
014112 
014116 
014124 
014130 
014132 
014136 
014144 
014150 
014152 
014156 
014160 
014162 
014164 
014164 

014164 
014166 
014170 



000056 
014100 
000003 
014022 
000056 



004737 
012737 
104020 
104003 
004737 
110137 
004737 
110177 
104017 
104003 
117737 
104004 
005337 
001355 
104012 



000057 
014164 
000003 
014110 
000057 



AT56: 



000005 
005277 
012737 
005237 
001375 
005077 
012737 
105777 
100404 
005227 
001372 
104003 
104012 



000060 
014234 
000012 



\X4-1+0,\X+2,\X+1 

**♦**#******#************ *****^*:^4,*i^ 4,^4, 4, 4141 4,4, 4,,, 4, ,^^4, 4,, 4,4, 4, 
;TEST NUMBER * 

; ADDRESS OF NEXT TEST « 

; ITERATION COUNT « 

; SCOPE ENTRY POINT * 



004322 
001750 



004426 
001560 
005374 
165342 



165326 
001564 



56 

AT57 

3. 

APBA 

X = X+1 
**************************** **^^n, 
DATA TEST USING JUMPER CONNECTOR. 
USES SPECIAL BINARY COUNT PATTERN FOR DATA. NO INTERRUPT 



****** **************,ti***^^*l^m0il>i)iiHiiltSlf*« 



APBA: 
APBB: 



JSR 

MOV 

TIMETX 

ERROR 

JSR 

MOVB 

JSR 

MOVB 

TIMERX 

ERROR 

MOVB 

DATCHK 

DEC 

BNE 

SCOPE 

TSTA 

TSTAA 



7,INBIN 
#1000. ,CTRO 



7.GTBINP 
%1 .CRBUFA 
7,MASKIT 
%1,®TXBUF 



©RXBUF.CRBUF 



CTRO 
APBB 



3.,EXT.0 

EXT. 3. ,\X+1+0,\X+2,\X+1 



; INITIALIZE BINARY COUNT PATTERN 

;SET CHARACTER COUNT TO 1000 

;TIME OUT TX DONE 

; ERROR DONE NOT SETTING 

;GET BINARY CHARACTER 

;SAVE CHAR IN CRBUFA AND 

;MASK OFF NON TRANSMITTED BITS 

;LOAD CHAR. 

;TIME OUT RX DONE 

; ERROR DONE NOT SETTING 

; LOAD RECEIVED DATA INTO CRBUF 

; CHECK DATA 

; TESTED 1000 CHARACTERS 

; BRANCH IF NOT 

;YES. SCOPE 



1*****************4, 



******************** 
AT57: 57 

AT60 

3. 

EXTA 

X=X+1 
;************************#********* ^^^^Hf 



********* *****0***m*,#4,f**tiKt>0ttiii,#mi.i»i0iit#if*'** 



;TEST NUMBER 

; ADDRESS OF NEXT TEST 

; ITERATION COUNT 

; SCOPE ENTRY POINT 



***************** «4, 4,* ««,««4,4, 4,4,41 4,41 4, 4,4, 4,4, 4,4, 



165272 
177770 
014154 

165260 
130000 
165240 



JTEST THAT RDR BUSY TURNS OFF RDR ENABLE 

;WHEN RUN ON AN XOR TESTER 

EXTA: reset ; RESET 

@RXCSR ;SET RDR ENABLE, 

iS>-10.3$+2 

3$+2 

2$ 

©TXBUF 

#-50000. 3$+2 

©RXCSR 

6$ 

#-10 

5$ 



2$: 



5$: 
3$: 



6$: 



INC 

MOV 

INC 

BNE 

CLR 

MOV 

TSTB 

BMI 

INC 

BNE 

ERROR 

SCOPE 

TSTA 

TSTAA 



SEE IF RDE IS TURNED OFF BY RDR BUSY 

;WAIT LOOP FOR XOR TESTER 

JSHIP OUT CHAR. 

JTEST COMPLETE 

; ALLOW TIME FOR RDR DONE TO SET 

•.FAILURE OF RDR DONE TO SET 



10., EX.0 

EX , 1 . . \X+1 +0 , \X+2 . \X+1 

*****************4,#**4,*4,*,„»4,4,*^^^^^^^^^4,4,^^^^^^^^^4,^^^^^^^^^^^^^^^^^^^^^^^ 

60 ;TEST NUMBER * 

AT61 ; ADDRESS OF NEXT TEST * 

10. ; ITERATION COUNT « 
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SEQ 00S3 



2766 
2767 
2768 
2769 
2770 
2771 
2772 
2773 
2774 
2775 
2776 
2777 
2778 
2779 
2780 
2781 
2782 
2783 
2784 
2785 
2786 
2787 
2788 
2789 
2790 
2791 
2792 
2793 
2794 
2795 
2796 
2797 
2798 
2799 
2800 
2801 
2802 
2803 
2804 
2805 
2806 
2807 
2808 
2809 
2810 
2811 
2812 
2813 
2814 
2815 
2816 
2817 
2818 
2819 
2820 
2821 



014174 
014176 
014202 
014206 
014212 
014214 
014216 
014224 
014230 
014232 
014234 
014234 

014234 
014236 
014240 
014242 



014244 
014250 
014252 
014260 
014264 
014266 
014270 
014270 

014270 
014272 
014274 
014276 



014300 
014304 
014306 
014314 
014320 
014322 
014324 

014324 
014326 
014330 
014332 



014174 
000060 



000005 
004737 
005277 
105777 
100001 
104003 
012737 
005227 
001375 
104012 



000061 
014270 
000003 
014244 
000061 

005737 
100006 
012777 
005777 
000005 
104012 



000062 
014324 
000003 
014300 
000062 

005737 
100006 
012777 
005777 
000005 
104012 



100063 
177777 
000012 
014334 
000063 



; SCOPE ENTRY POINT 



EXA 
X«X+1 

• ^i^*m*'ii ************** *m**iit****'tt *************** «******#*'(i*^>lf^#04i0^ 
;TEST THAT WHEN RDR ENABLE IS SET THAT THE RXCSR DONE 
;BIT IS CLEARED 



«««««««««!»«« 



014404 
165202 
165176 



177770 
177770 



EXA: 



1$: 
3$: 



RESET 

JSR 

INC 

TSTB 

BPL 

ERROR 

MOV 

INC 

BNE 

SCOPE 

TSTA 

TSTAA 



PC.STRXD 
#RXCSR 
@RXCSR 
1$ 

#-10,3$-»-2 

#-10 

3$ 



;SET RCVR DONE 

;SET ENABLE 

;DONE SHOULD CLEAR 

;DONE NOT CLEAR 

-.WAIT 100MIC. SEC. FOR XOR 



3.,EXA,0 

EXA , 3 . , \X+1 +0 , \X+2 , \X+1 



• iti************** *************** ********** 



*««s«i>ti4<>jiiii««4i4i««itiiti««««iti«««««««i#«««««9««: 



EXAA: 



61 

AT62 
3. 

EXAA 
X=X+1 
t^***********,^ 



177777 
165124 



EXBA: 



TST 
BPL 
MOV 
TST 
RESET 
SCOPE 
TSTA 
TSTAA 
,^,*****^** 

62 

AT63 

3. 

EXBA 

X=X+1 

t*tH***#* 



;TEST NUMBER 

; ADDRESS OF NEXT TEST 

; ITERATION COUNT 

; SCOPE ENTRY POINT 

********* ******************^ ************ **iii*****nitm** 
; CHECKING JUMPER CONNECTIONS FOR XOR. RCVR 



XORFLG 
3$ 

#-1.@RXCSR 
@RXCSR 



3.,EXB,0 

EXB,3. ,\X+1+0,\X+2.\X+1 

**********iii*****i^******* 

;TEST NUMBER 

; ADDRESS OF NEXT TEST 

; ITERATION COUNT 

; SCOPE ENTRY POINT 



************* ********m*^***iit*** 



177677 
165074 



TST 

BPL 

MOV 

TST 

RESET 

SCOPE 

TSTAA 



XORFLG 

4$ 

#1 77677, ©TXCSR 

@TXCSR 



********* *********************#**i^*** 

JSAME AS ABOVE BUT FOR XMTR 



iti4i«4i9i$i«««4i«i«i 



'm********* 



AT63: 



A0B.10. AX+I+CD. LAST,\X+i 

****#ilf**^,t,i,******r^****^***^l*4,* 

;TEST NUMBER 

; ADDRESS OF NEXT TEST 

; ITERATION COUNT 

; SCOPE ENTRY POINT 



***************^*******t'*#^**** 



014334 004737 002706 



100063 

ATLAST 

10. 

AQBA 

X=X+1 

• ,i,*****ii,* **********#*****#****** ***********************#*********m*****'*nf«**ifnt^it'tSf 
JTEST THAT WHEN TXCSR BIT IS SET THAT THE OUTPUT DATA LINE 
;IS PULLED TO A SPACE. 
AOBA: USR %7,CDINIT ;INIT IF C-D DEVICE 
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SEQ 0053 



2822 


014340 


052777 


000004 


165046 


BIS 


#BIT2,@>TXCSR 


2823 


014346 


052777 


000001 


165040 


BIS 


#BITO,®-.XCSR 


2824 


014354 


012777 


000252 


165034 


MOV 


#252,®TXBUF 


2825 


014362 


104017 






TIMERX 




2826 


014364 


104003 






ERROR 




2827 


014366 


127727 


165020 


000000 


CMPB 


@RXBUF,#0 


2828 


014374 


001401 






BEQ 


.+4 


2829 


014376 


104003 






ERROR 




2830 


014400 


104011 






SRESET 




2831 


014402 


104012 






SCOPE 





;SET MAINTENANCE BIT IN TXCSR 

;SET BREAK BIT 

;LOAD BUFFER 

JTIME OUT RX DONE 

; ERROR DONE NOT SETTING 

{CHARACTER RECEIVED SHOULD BE 

; CHARACTER OTHER THAN 
; ISSUE RESET 
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sm 00S4 



2832 










; 






2833 










^SUBROUTINE TO 


SET RXCSR DONE BIT. 


2834 


014404 


052777 


000004 


165002 


STRXD: 


BIS 


#BIT2,@TXCSR ;SET MAINTENANCE BIT. 


2835 


014412 


005077 


165000 






CLR 


©TXBUF JLOAD TXBUF. 


2836 


014416 


104017 








TIMERX 


JTIME OUT TX DONE 


2837 


014420 


104003 








ERROR 


; ERROR DONE NOT SETTING 


2838 


014422 


000207 








RTS 


%7 ;EXIT. 


2839 










;SUBROUTINE TO 


CHECK THAT CTRO THROUGH CTR3 CONTAIN DES( 


2840 


014424 


023737 


001564 


001566 


CMPT: 


CMP 


CTRO.CTRI 


2841 


014432 


101430 








BLOS 


CMPTNG 


2842 


014434 


023737 


001566 


001570 




CMP 


CTR1,CTR2 


2843 


014442 


101424 








BLOS 


CMPTNG 


2844 


014444 


023737 


001570 


001572 




CMP 


CTR2,CTR3 


2845 


014452 


101420 








BLOS 


CMPTNG 


2846 


014454 


023737 


001572 


001574 




CMP 


CTR3,CTR4 


2847 


014462 


101414 








BLOS 


CMPTNG 


2848 


014464 


023737 


001574 


001576 




CMP 


CTR4,CTR5 


2849 


014472 


101410 








BLOS 


CMPTNG 


2850 


014474 


023737 


001576 


001600 




CMP 


CTR5.CTR6 


2851 


014502 


101404 








BLOS 


CMPTNG 


2852 


014504 


023737 


001600 


001602 




CMP 


CTR6,CTR7 


2853 


014512 


101002 








BHI 


CMPTOK 


2854 


014514 


062716 


000002 




CMPTNG: 


ADD 


ff2,&%6 


2855 


014520 


000207 






cmptok: 


RTS 


%7 
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2856 
2857 
2858 
2859 
2860 
2861 
2862 
2863 
2864 
2865 
2866 
2867 
2868 
2869 
2870 
2871 
2872 
2873 
2874 
2875 
2876 
2877 
2878 
2879 
2880 
2881 
2882 
2883 
2884 
2885 
2886 
2887 
2888 
2889 
2890 
2891 
2892 
2893 
2894 
2895 



014522 
014524 
014526 
014532 
014534 
014536 
014542 
014546 
014554 
014562 
014566 
014570 
014572 



014574 
014576 
014600 
014604 
014606 
014610 
014614 
014620 
014526 
014S34 
014642 
014646 
014650 
014652 
014656 
014660 
014662 
014664 
014666 
014670 



104000 
015632 
004537 
104000 
015727 
004737 
012637 
113737 
113777 
105777 
104016 
000000 
000765 



104000 
015672 
004537 
104000 
015727 
004737 
012637 
052777 
113737 
113777 
105777 
104016 
000000 
017700 
000005 
000005 
000005 
000005 
000005 
000753 



003554 
001622 
001622 
001623 
164626 



003554 
001622 
000004 
001622 
001623 
164546 



PRG1 
***** 
PRGi: 



014570 PRGIA: 
164634 



TRANSMITTER SCOPE LOOP 



S.LINSLX 



PC.RDOCT 
(SP)+,TEMP2 
TEMP2,PRG1B 
TEMP2+1 , ©TXBUF 
©TXCSR 



PRG1A 



PRG2 
***** 
PRG2: 



164566 PRG2A: 

014650 

164554 



TYPE 
P1TIT 
JSR 
TYPE 
SELCAD 
JSR 
MOV 
MOVB 
MOVB 
TSTB 
DELAY 
OPEN 
BR 
**** 
RECEIVER SCOPE LOOP 



TYPE 

P2TIT 

JSR 

TYPE 

SELCAD 

JSR 

MOV 

BIS 

MOVB 

MOVB 

TSTB 

DELAY 

OPEN 

MOV 

RESET 

RESET 

RESET 

RESET 

RESET 

BR 



PC.RDOCT 

(SP)+,TEMP2 

i4'BIT2,@TXCSR 

TEMP2,PRG2B 

TEMP2+1 ,@TXBUF 

©TXCSR 



;TYPE PROGRAM TITLE. 

;G0 GET LINE # FROM USER 
;TYPE SELECT CHAR AND DELAY. 

JREAD IN DATA. 

jSTORE DATA. 

;DELAY COUNT TO PRG1B. 

;LOAD TXBUF. 

;TEST FOR DONE. ; J+-,G 

-.DELAY # OF MSECS. SET AT SR. 

; REPEAT. 



;TYPE PROGRAM TITLE. 

;G0 GET LINE # FROM USER 
;TYPE SELECT CHAR AND DELAY. 

;READ IN DATA. 

;STORE DATA. 

;SET MAINTENANCE BIT. 

; DELAY COUNT TO PRG2B. 

;LOAD TXBUF. 

;TEST FOR DONE ; ; ++G 

JDELAY # OF MSECS. SET IN SR. 

;RXBUF CONTENTS TO RO. 

; DISPLAY CONTENTS OF RXBUF (IN RO). 

;BY ISSUING 5 RESET INSTRUCTIONS 
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SEQ 00S6 



) 



2896 
2897 
2898 
2899 
2900 
2901 
2902 
2903 
2904 
2905 
2906 
2907 
2908 
2909 
2910 
2911 
2912 
2913 
2914 
2915 
2916 
2917 
2918 
2919 
2920 
2921 
2922 
2923 
2924 
2925 
2926 
2927 
2928 
2929 
2930 
2931 
2932 
2933 
2934 
2935 



014672 
014674 
014676 
014702 
014704 
014706 
014712 
014716 
014724 
014730 



.014732 
014734 
014736 
014742 
014746 
014752 
014756 
014762 

014764 
014772 
014774 
014776 
015000 
015002 
015010 
015014 
015022 
015026 
015030 
015032 
015040 
015042 



104000 
016475 
004537 
104000 
016620 
004737 
012637 
113737 
004737 
000772 



104000 
016545 
004537 
004737 
004737 
110137 
004737 
000771 

032777 
001001 
104002 
104020 
104003 
052777 
005777 
013777 
004737 
104017 
104003 
017737 
104004 
000207 



SINGLE CHARACTER MAINTENANCE MODE DATA TEST. 
;TYPE PROGRAM TITLE. 



003554 
001622 
001623 
014764 



004132 
004322 
004426 
001560 
014764 



001560 PRG3A: 



TYPE 




P3TIT 




JSR 


S.LINSLX 


TYPE 




SELCAR 




JSR 


PC.RDOCT 


MOV 


(SP)+,TEMP2 


MOVB 


TEMP2+1 .CRBUFA 


JSR 


%7,M0UTIN 


BR 


PRG3A 



;G0 GET LINE # FROM USER 
;TYPE: SELECT CHARACTER. 

;GET TEST CHAR AND DELAY FROM USER. 

;STORE TEST CHAR AND DELAY. 

;MOVE DATA CHAR TO CRBUFA. 

;G0 OUTPUT. RECEIVE, AND CHECK DATA. 



PRG4 - SPECIAL BINARY COUNT MAINTENANCE MODE DATA TEST. 



000200 163202 



000004 
164376 
001560 
005374 



164354 001556 



PRG4: TYPE 
P4TIT 
JSR 
JSR 

PRG4A: JSR 
MOVB 
JSR 
BR 

jSUBROUTINE TO 

MOUTIN: BIT 
BNE 
STALL 
TIMETX 
ERROR 
BIS 
TST 
MOV 
JSR 

TIMERX 
ERROR 
MOV 

DATCHK 
RTS 



5,LINSLX 
%7,INBIN 
%7,GTBINP 
%1 .CRBUFA 
%7, MOUTIN 
PRG4A 
OUTPUT, RECEIVE, 
#BIT7,@SRPTR 
.+4 



#BIT2,@TXCSR 
@RXBUF 

CRBUFA. ©TXBUF 
7,MASKIT 



PRXBUF.CRBUF 
%7 



;TYPE PROGRAM TITLE. 

;G0 GET LINE # FROM USER 

; INITIALIZE BINARY COUNT. 

;GET BINARY CHARACTER. 

;SAVE AT CRBUFA. 

;G0 OUTPUT, RECEIVE, AND CHECK DATA. 

; REPEAT. 

AND CHEC.-; DATA WITH MAINTENANCE BIT SET. 

;SEE IF BIT 7 IS SET. 

; BRANCH IF SET. 

;SET. DO A RANDOM STALL. 

;TIME OUT TX DONE 

; ERROR DONE NOT SETTING 

;SET MAINTENANCE BIT. 

;CLR RX DONE 

;LOAD TXBUF. 

;MASK OFF NON TRANSMITTED BITS 

;TIME OUT RX DONE 

; ERROR DONE NOT SETTING 

;MOVE CHAR IN RX BUFFER TO CRBUF. 

; COMPARE EXPECTED AND RECEIVED DATA 

;EXIT. 
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SEQ 00S7 



2936 












2937 










lASCII 


2938 










; 


2939 


015044 


042045 


030514 


026461 


MTIT: 


2940 


015052 


026105 


027503 


020104 




2941 


015060 


043117 


047114 


020105 




2942 


015066 


051524 


020124 


020055 




2943 


015074 


055103 


046104 


026501 




2944 


015102 


022507 








2945 


015104 


046445 


050101 


047440 




2946 


015112 


020106 


042504 


044526 




2947 


015120 


042503 


020123 


051120 




2948 


015126 


051505 


047105 


022524 




2949 


015134 


100 








2950 


015135 


040 


020040 


020040 


MDEVAD 


2951 


015142 


020040 


020040 


020040 




2952 


015150 


020040 


022440 


100 




2953 


015155 


045 


054524 


042520 


PGMSG: 


2954 


015162 


044440 


020116 


051120 




2955 


015170 


043517 


040522 


0201 15 




2956 


015176 


052516 


041115 


051105 




2957 


015204 


020040 


020040 


100 




2958 


015211 


045 


047516 


042516 


MNONE: 


2959 


015216 


043040 


052517 


042116 




2960 


015224 


040045 








2961 


015226 


052045 






EMO: 


2962 


015230 


020040 


020040 


041520 


ATNUMB 


2963 


015236 


020075 








2964 


015240 


020040 


020040 


020040 


APC: 


2965 


015246 


020040 


054122 


051503 




2966 


015254 


036522 


040 






2967 


015257 


040 


020040 


020040 


MRXNUM 


2968 


015264 


020040 


040040 






2969 


015270 


022445 


051120 


030107 


POTIT: 


2970 


015276 


026440 


044440 


050116 




2971 


015304 


052125 


047455 


052125 




2972 


015312 


052520 


020124 


047514 




2973 


015320 


044507 


020103 


042524 




2974 


015326 


052123 


027123 


040 




2975 


015333 


045 


044504 


041523 




2976 


015340 


047117 


042516 


052103 




2977 


015346 


042040 


030514 


026461 




2978 


015354 


020105 


051106 


046517 




2979 


015362 


046440 


042117 


046505 




2980 


015370 


040440 


042116 


041440 




2981 


015376 


047117 


042516 


052103 




2982 


015404 


045040 


046525 


042520 




2983 


015412 


020122 


047524 


041440 




2984 


015420 


041 101 


042514 


022456 




2985 


015426 


100 








2986 


015427 


124 


041530 


051123 


ATXCSR 


2987 


015434 


051440 


041057 


020072 




2988 


015442 


020040 


020040 


020040 


ATXSB: 


2989 


015450 


020040 


040527 


035123 




2990 


015456 


040 








2991 


015457 


040 


020040 


020040 


ATXWAS: 



.ASCII '%DL11-E.C/D OFLNE TST - CZDLA-G%' 



.ASCII •%MAP OF DEVICES PRESENT%®' 



.ASCII '%TYPE IN PROGRAM NUMBER @' 



.ASCII '%NONE FOUND%®' 



.ASCII '%T' 
.ASCII • PC= 



.ASCII ' @' 

.ASCII •%%PRGO - INPUT-OUTPUT LOGIC TESTS. 



.ASCII '%DISCONNECT DL11-E FROM MODEM' 



.ASCII ' AND CONNECT JUMPER TO CABLE. %@' 



.ASCII 'TXCSR S/B: ' 
.ASCII ' WAS: 
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SiQ OOSS 



2992 


015464 


040040 








2993 


015466 


054122 


051503 


020122 


ARXCSR: 


2994 


015474 


027523 


035102 


040 




2995 


015501 


040 


020040 


020040 


ARXSB: 


2996 


015506 


020040 


053440 


051501 




2997 


015514 


020072 








2998 


015516 


020040 


020040 


020040 


ARXWAS: 


2999 


015524 


040040 








3000 


015526 


054124 


051440 


042520 


ETXTIM: 


3001 


015534 


042105 


020123 


047516 




3002 


015542 


020124 


047111 


040440 




3003 


015550 


041523 


047105 


04450A 




3004 


015556 


043516 


047440 


042122 




3005 


015564 


051105 


040056 






3006 


015570 


054122 


051440 


042520 


ERXTIM: 


3007 


015576 


042105 


020123 


047516 




3008 


015604 


020124 


047111 


040440 




3009 


015612 


041523 


047105 


044504 




3010 


015620 


043516 


047440 


042122 




3011 


015626 


051105 


040056 






3012 


015632 


022445 


051120 


030507 


PITIT: 


3013 


015640 


026440 


052040 


040522 




3014 


015646 


051516 


044515 


052124 




3015 


015654 


051105 


051440 


047503 




3016 


015662 


042520 


046040 


047517 




3017 


015670 


040120 








3018 


015672 


022445 


051120 


031107 


P2TIT: 


3019 


015700 


026440 


051040 


041505 




3020 


015706 


044505 


042526 


020122 




3021 


015714 


041523 


050117 


020105 




3022 


015722 


047514 


050117 


100 




3023 


015727 


045 


054524 


042520 


SELCAD: 


3024 


015734 


052040 


051505 


020124 




3025 


015742 


044103 


051101 


020056 




3026 


015750 


047503 


042504 


044440 




3027 


015756 


020116 


044502 


051524 




3028 


015764 


030440 


026465 


026070 




3029 


015772 


054524 


042520 


042040 




3030 


016000 


046105 


054501 


052040 




3031 


018006 


046511 


020105 


047111 




3032 


016014 


041040 


052111 


020123 




3033 


016022 


026467 


060 






3034 


016025 


045 


043117 


040440 




3035 


016032 


020116 


041517 


040524 




3036 


016040 


020114 


047527 


042122 




3037 


016046 


022456 


100 






3038 


016051 


104 


052101 


020101 


ERDAT: 


3039 


016056 


027523 


035102 


040 




3040 


016063 


040 


020040 


053440 


AASB: 


3041 


016070 


051501 


020072 






3042 


016074 


020040 


040 




AWAS: 


3043 


016077 


040 


054122 


052502 




3044 


016104 


035106 


040 






3045 


016107 


040 


020040 


020040 


ARXBUF: 


3046 


016114 


020040 


100 






3047 


016117 


045 


042523 


020124 


ASETSR: 



.ASCII 'TX SPEEDS NOT IN ASCENDING ORDER.®' 



.ASCII 'RX SPEEDS NOT IN ASCENDING ORDER.®' 



.ASCII •%%PRG1 - TRANSMITTER SCOPE LOOP®' 



.ASCII •%%PRG2 - RECEIVER SCOPE LOOP©' 



.ASCII '%TYPE TEST CHAR. CODE IN BITS 15-8 ►TYPE DELAY TIME IN BITS 7-0' 



.ASCII '%0F AN OCTAL WORD.%@' 



.ASCII 
.ASCII 



%SET DESIRED SR OPTIONS. NORMAL OPERATION • 
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SEQ OOSS 



3048 


016124 


042504 


044523 


042522 


3049 


016132 


020104 


051123 


047440 


3050 


016140 


052120 


047511 


051516 


3051 


016146 


020056 


047516 


046522 


3052 


016154 


046101 


047440 


042520 


3053 


016162 


040522 


044524 


047117 


3054 


016170 


040 






3055 


016171 


111 


020123 


044527 


3056 


016176 


044124 


051440 


020122 


3057 


016204 


020075 


030060 


030060 


3058 


016212 


030060 


040045 




3059 


016216 


044445 


041516 


051117 AINCRT 


3060 


016224 


042522 


052103 


051040 


3061 


016232 


052517 


044524 


042516 


3062 


016240 


051440 


046105 


041505 


3063 


016246 


042524 


026104 


050040 


3064 


016254 


040514 


042503 


041440 


3065 


016252 


051117 


042522 


052103 


3066 


016270 


050040 


047522 


051107 


3067 


016276 


046501 






3068 


016300 


044445 


020116 


051123 


3069 


016306 


030040 


031055 


040440 


3070 


016314 


042116 


050040 


042522 


3071 


016322 


051523 


041440 


047117 


3072 


016330 


044524 


052516 


027105 


3073 


016336 


100 






3074 


016337 


045 


047111 


040526 AINCPG 


3075 


016344 


044514 


020104 


051120 


3076 


016352 


043517 


040522 


020115 


3077 


016360 


042523 


042514 


052103 


3078 


016366 


042105 


040056 




307 9 


016372 


207 




APGEND 


3080 


016373 


045 


047105 


020104 


3081 


016400 


040520 


051523 


036440 


3082 


016406 


040 






3083 


016407 


040 


020040 


020040 APCNT: 


3084 


016414 


020040 


046040 


047111 


3085 


016422 


020105 


020075 


040 


3086 


016427 


040 


020040 


051040 ACLIN: 


3087 


016434 


041530 


051123 


036440 


3088 


016442 


040 






3089 


016443 


040 


020040 


020040 APRXC: 


3090 


016450 


020040 


053040 


041505 


3091 


016456 


047524 


020122 


020075 


3092 


016464 


020040 


020040 


020040 APVEC: 


3093 


016472 


020040 


100 




3094 


016475 


045 


050045 


043522 P3TIT! 


3095 


016502 


026463 


044523 


043516 


3096 


016510 


042514 


041440 


040510 


3097 


016516 


020122 


040515 


047111 


3098 


016524 


020124 


047515 


042504 


3099 


016532 


042040 


052101 


02010. 


3100 


016540 


042524 


052123 


100 


3101 


016545 


045 


050045 


043522 P4TIT: 


3102 


016552 


026464 


050123 


041505 


3103 


016560 


041040 


047111 


041440 



.ASCII 'IS WITH SR » 000000%©' 



.ASCII '^INCORRECT ROUTINE SELECTED, PLACE CORRECT PROGRAIS' 



.ASCII 'XIN SR 0-1 AND PRESS CONTINUE.©' 



.ASCII 'XINVALID PROGRAM SELECTED.®' 



.BYTE 207 

.ASCII '%END PASS « 



.ASCII ' LINE 
.ASCII ' RXCSR « ' 



.ASCII 



VECTOR 



.ASCII ' #• 

.ASCII '%%PRG3-SINGLE CHAR MAINT MODE DATA TESTS* ' 



.ASCII '%%PRG4-SPEC BIN COUNT MAINT MODE DATA TEST?' 
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SiQ OOSO 



3104 


016566 


052517 


052116 


046440 




3105 


016574 


044501 


052116 


046440 




3106 


016602 


042117 


020105 


040504 




3107 


016610 


040524 


052040 


051505 




3108 


016616 


040124 








3109 


016620 


052045 


050131 


020105 


SELCAR 


3110 


016626 


047111 


052040 


051505 




3111 


016634 


020124 


044103 


051101 




3112 


016642 


020056 


047503 


042504 




3113 


016650 


020056 


020040 


022440 




3114 


016656 


100 








3115 


016657 


045 


054524 


042520 


LDLINE 


3116 


016664 


044440 


020116 


044514 




3117 


016672 


042516 


047040 


027117 




3118 


016700 


020040 


020040 


100 




3119 


016705 


045 


044514 


042516 


ALINE: 


3120 


016712 


047040 


027117 






3121 


016716 


020040 


053440 


051501 


SELINE 


3122 


016724 


051440 


046105 


041505 




3123 


016732 


042524 


040104 






3124 


016736 


051045 


041505 


044505 


MSETRX 


3125 


016744 


042526 


020122 


050123 




3126 


016752 


042505 


020104 


044103 




3127 


016760 


041505 


040113 






3128 


016764 


052045 


040522 


051516 


MSETTX 


3129 


016772 


044515 


020124 


050123 




3130 


017000 


042505 


020104 


044103 




3131 


017006 


041505 


040113 






3132 


017012 


051445 


052105 


041440 


MSETC: 


3133 


017020 


047514 


045503 


051440 




3134 


017026 


044527 


041524 


042510 




3135 


017034 


020123 


047524 


050040 




3136 


017042 


051517 


052111 


04751 * 




3137 


017050 


026116 


052040 


042510 




3138 


017056 


0201 16 


051120 


051505 




3139 


017064 


020123 


047503 


052116 




3140 


017072 


047111 


042525 


040056 




3141 


017100 


042445 


051122 


051117 


mterr: 


3142 


017106 


026440 


052440 


042516 




3143 


017114 


050130 


041505 


042524 




3144 


017122 


020104 


051124 


050101 




3145 


017130 


052045 


040522 


050120 




3146 


017136 


042105 


052040 


020117 




3147 


017144 


040 








3148 


017145 


040 


020040 


020040 


MTO: 


3149 


017152 


020040 


040 






3150 


017155 


045 


051124 


050101 




3151 


017162 


042520 


020104 


051106 




3152 


017170 


046517 


050040 


020103 




3153 


017176 


040 








3154 


017177 


040 


020040 


020040 


mfrom: 


3155 


017204 


020040 


040040 






3156 


017210 


047045 


020117 


042504 


MNOLIN: 


3157 


017216 


044526 


042503 


050040 




3158 


017224 


042522 


042523 


052116 




3159 


017232 


026440 


052040 


044510 





.ASCII '%TYPE IN TEST CHAR. CODE. %@' 

.ASCII '%l>fPE IN LINE NO. ©' 

.ASCII 'SSLINE NO." 

.ASCII ' WAS SELECTEu@' 

.ASCII 'XRECEIVER SPEED CHECK©* 

.ASCII "XTRANSMIT SPEED CHECK©' 

.ASCII 'SiSET CLOCK SWITCHES TO POSITION, THEN PRESS CONTINUE. #• 



.ASCII '%ERROR - UNEXPECTED TRAP' 

.ASCII 'STRAPPED TO ' 

.ASCII ' • 

.ASCII 'XTRAPPED FROM PC ' 

-ASCII • @' 

.ASCII '%N0 DEVICE PRESENT - THIS LINE NO.®' 
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SEQ 0061 



3160 


017240 


020123 


044514 


042516 














3161 


017246 


047040 


027117 


100 














3162 


017253 


077 


040045 




DTERR: 


.ASCII 


•?%# 








3163 


017256 


047045 


020117 


047111 


INTER: 


.ASCII 


'XNO 


INTERRUPT®' 




3164 


017264 


042524 


051122 


050125 














3165 


017272 


040124 


















3166 


017274 


041445 


020123 


020075 


MSO: 


.ASCII 


'XCS 




0©' 




3167 


017302 


040060 


















3168 


017304 


041445 


020123 


020075 


MSi: 


.ASCII 


•%cs 




1®' 




3169 


017312 


040061 


















3170 


017314 


041445 


020123 


020075 


MS2: 


.ASCII 


'J6CS 




2®' 




3171 


017322 


040062 


















3172 


017324 


041445 


020123 


020075 


MS3: 


.ASCII 


•%cs 




3®' 




3173 


017332 


040063 


















3174 


017334 


041445 


020123 


020075 


MS4: 


.ASCII 


'%CS 




4®' 




3175 


017342 


040064 


















3176 


017344 


041445 


020123 


020075 


MS5: 


.ASCII 


'%CS 




5®' 




3177 


017352 


040065 


















3178 


017354 


041445 


020123 


020075 


MS6: 


.ASCII 


•%cs 




6®' 




3179 


017362 


040066 


















3180 


017364 


041445 


020123 


020075 


MS7: 


.ASCII 


•%cs 




7®' 




3181 


017372 


040067 


















3182 


017374 


051045 


041505 


053117 


MPWRF: 


.ASCII 


'^RECOVERED FROM POWER FAILURE® 


3183 


017402 


051105 


042105 


043040 














3184 


017410 


047522 


020115 


047520 














3185 


017416 


042527 


020122 


040506 














3186 


017424 


046111 


051125 


040105 














3187 












.EVEN 










3188 




000001 








.END 
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CROSS REFERENCE TABLE -- 



USER SYMBOLS 



SEQ 006S 



AAA 


006514 


AAAA 


010052 


AAAB 


010066 


AAB 


006526 


AABA 


013556 


AABB 


013602 


AABC 


013612 


AABD 


013626 


AABE 


013632 


AAE 


006530 


AASB 


016063 


ABA 


006546 


ABAA 


011130 


ABAB 


011222 


ABB 


006566 


ABBA 


013650 


ABBB 


013672 


ABE 


006570 


ACA 


006606 


ACAA 


011234 


ACAB 


011364 


ACB 


006620 


ACBA 


013714 


ACBB 


013752 


ACBC 


013754 


ACE 


006622 


ACLIN 


016427 


ADA 


006640 


ADAA 


011404 


ADAB 


011432 


ADAC 


011450 


ADB 


006652 


ADDA 


014000 


ADE 


006654 


ADTENP 


004750 


AEA 


006672 


AEB 


006706 


AEC 


006730 


AED 


006750 


AFBA 


010100 


AFBB 


010126 


AFBC 


010152 


AGA 


006772 


AGB 


007006 


AGBA 


010164 


AGBB 


010220 


AGBC 


010254 


AGBD 


010270 


AGBE 


010324 


AGC 


007030 


AGD 


007050 


AIAA 


01 1464 


AIAF 


011710 


AIAS 


011712 


AIASA 


011742 


AIAST 


011774 



1502 


1506# 


1851 


laSSiS' 


1856 


1859# 


1508# 


1511 


2634 


2640# 


2646# 


2652 


2641 


2648# 


2649 


265 1# 


2648 


2653# 


1506 


1509# 


1326 


3040*' 


1518 


1522# 


2081 


2085# 


2089 


2102# 


1524 


1526* 


2662 


2666* 


2669 


2671* 


1522 


1527# 


1536 


1540* 


2109 


21 14# 


2127 


2139# 


1542# 


1545 


2679 


2685* 


2684 


2693# 


2692 


2694# 


1540 


1543* 


1258 


3086* 


1552 


1556* 


2147 


2152# 


2157 


2160# 


2159 


2165/^ 


1558/S' 


1561 


2702 


2707# 


1556 


1559# 


1186 


1212# 


1568 


1573# 


1574 


1577* 


1579 


1582^!^ 


1576 


1581 


1872 


1877# 


1880 


1883* 


1882 


1886 


1595 


1599# 


1600 


1603* 


1895 


1900# 


1904 


1907* 


1913 


1916* 


1918 


1921* 


1906 


1915 


1605 


1608* 


1602 


1607 


2173 


2178* 


2223 


2226.^ 


2185 


2190 


2235# 


2238 


2186 


2191 



) 
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CROSS REFERENCE TABLE — USER SYMBOLS 



SEQ 0063 



AINCPG 


016337 


AINCRT 


016216 


AJA 


007072 


AJB 


007114 


AJBA 


010336 


AJBB 


010364 


AJBC 


010412 


AJBD 


010436 


AJC 


007136 


AJD 


007156 


AKA 


007200 


AKB 


007212 


AKBA 


010450 


AKBC 


010506 


ALA 


007224 


ALAA 


012006 


ALAB 


012036 


ALAC 


012050 


ALBA 


010656 


ALBB 


010704 


ALBC 


010732 


ALBD 


010756 


ALINE 


016705 


ALY 


007254 


ALZ 


007274 


AMAA 


012062 


AMAC 


012114 


AMBA 


010770 


AMBB 


011030 


AMBC 


01 1044 


AMBD 


011072 


AMBE 


011116 


AOAA 


012132 


AOAB 


012150 


A0AB1 


012164 


AOAC 


012206 


AOAD 


012220 


AOBA 


010544 


AOBB 


010572 


AOBC 


010620 


AOBD 


010644 


APA 


007306 


APB 


007322 


APBA 


014022 


APBB 


014030 


APC 


015240 


APCNT 


016407 


APCX 


007344 


APD 


007364 


APGEND 


016372 


APRXC 


016443 


APVEC 


016464 


AOA 


007406 


AQAA 


012236 


AOAB 


012462 


AOAS 


012464 



1246 


3074* 


1242 


3059* 


1621 


1625* 


1627 


1630* 


1937 


1942* 


1945 


1948* 


1951 


1954* 


1947 


1953 


1632 


1635* 


1629 


1634 


1648 . 


1653* 


1654 


1657* 


1966 


1971* 


1976 


1978* 


1664 


1668* 


2252 


2259* 


2264 


2267* 


2266 


2269 


2018 


2023* 


2026 


2029* 


2032 


2035* 


2028 


2034 


1112 


3119* 


1671 


1674* 


1673 


1676 


2278 


2283* 


2289 


2291* 


2047 


2051* 


2056 


2059* 


2060 


2063* 


2066 


2069* 


2058 


2062 


2298 


230^.'' 


2307* 


2311 


2308 


2310* 


2313 


2316* 


2315 


2317 


1990 


1994* 


1997 


2000* 


2003 


2006* 


1999 


2005 


1685 


1689* 


1690 


1693* 


2715 


2721* 


2722* 


2733 


1353 


2964* 


1254 


3083* 


1695 


1698* 


1692 


1697 


1269 


3079* 


1262 


3089* 


1266 


3092* 


1711 


1715# 


2327 


2335* 


2380 


2383* 


2342 


2347 
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CROSS REFERENCE TABLE — USER SYMBOLS 



§iO 00i4 



) 



AOASA 


012506 


AOAST 


012526 


AQB 


007422 


AOBA 


014334 


AOC 


007444 


AOD 


007464 


ARA 


007506 


ARAA 


012540 


ARAS 


012654 


ARB 


007530 


ARC 


007552 


ARD 


007572 


ARXBUF 


016107 


ARXCSR 


015466 


ARXSB 


015501 


ARXWAS 


015516 


ASA 


007614 


ASB 


007636 


ASC 


007560 


ASD ^ 


007700 


ASETSR 


0151 17 


ATA 


007722 


ATAA 


012714 


ATAB 


012746 


ATAC 


012750 


ATB 


007736 


ATLAST= 


177777 


ATNUMB 


015230 


ATXCSR 


015427 


ATXSB 


015442 


ATXWAS 


015457 


ATO 


0C6504 


ATI 


C06536 


AT10 


007214 


AT11 


007276 


AT12 


007376 


AT13 


007476 


AT14 


007604 


AT15 


007712 


AT1S 


007740 


AT 17 


007766 


AT2 


006576 


AT20 


010014 


AT21 


010042 


AT22 


010070 


AT23 


010154 


AT24 


010326 


AT25 


010440 


AT26 


010534 


AT27 


010646 


AT3 


006630 


AT30 


010760 


AT31 


011120 


AT32 


011224 


AT33 


011374 


AT34 


011454 



2390(^ 


2393 


2343 


2348 


1716 


1719* 


2816 


2821* 


1721 


1724* 


1718 


1723 


1737 


1741* 


2402 


2406* 


2406 


2407 


1743 


1746* 


1748 


1751* 


1745 


1750 


1330 


3045* 


2138 


2993* 


2131 


2995* 


2135 


2998* 


1764 


1768* 


1770 


1773* 


1775 


1778* 


1772 


1777 


1238 


3047* 


1791 


1795* 


2442 


2450* 


2456ff 


2459 


2449 


2457* 


1796 


1799* 


477# 


2814 


1361 


2962* 


2101 


2986* 


2094 


2988* 


2098 


2991* 


1486 


1499* 


1500 


1515* 


1646 


1661* 


1662 


1682* 


1683 


1708* 


1709 


1734* 


1735 


1761* 


1762 


1788* 


1789 


1803* 


1804 


1818* 


1516 


1533* 


1819 


1833* 


1834 


1848* 


1849 


1869* 


1870 


1892* 


1893 


1934* 


1935 


1963* 


1964 


1987* 


1988 


2015* 


1534 


1549* 


2016 


2044,. 


2045 


2078* 


2079 


2106* 


2107 


2144* 


2145 


2170* 



3391 « 239511' 
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CROSS REFERENCE TABLE 



SEQ 0065 



— USER SYMBOLS 



AT35 


011776 


2171 


2249* 


AT36 


012052 


2250 


2275* 


AT37 


0121 16 


2276 


2295* 


AT4 


006662 


1550 


1565* 


AT40 


012226 


2296 


2324* 


AT41 


012530 


2325 


2399* 


AT42 


012674 


2400 


2439* 


AT43 


012762 


2440 


2463* 


AT44 


013040 


2464 


2485* 


AT45 


013124 


2486 


2508* 


AT46 


013222 


2509 


2536* 


AT47 


013306 


2537 


2560* 


ATS 


006762 


1566 


1592* 


AT50 


013370 


2561 


2584* 


AT51 


013452 


2585 


2607* 


AT52 


013542 


2608 


2631* 


AT53 


013640 


2632 


2659* 


AT54 


013700 


2660 


2676* 


AT55 


013764 


2677 


2699* 


AT56 


014006 


2700 


2712* 


AT57 


014100 


2713 


2738* 


AT6 


007062 


1593 


1618* 


AT60 


014164 


2739 


2763* 


AT61 


014234 


2764 


2784* 


AT62 


014270 


2785 


2799* 


AT63 


014324 


2800 


2813* 


AT7 


007170 


1619 


1645* 


AUAA 


012776 


2466 


2473* 


AUAB 


013022 


2477* 


2481 


AUAC 


013032 


2472 


2479* 


AVAA 


013054 


2488 


2495* 


AVAB 


013112 


2494 


2502* 


AVAC 


013114 


2501 


2503* 


AWAA 


013134 


2511 


2516* 


AWAB 


013164 


2523* 


2529 


AWAC 


013174 


2517 


2525* 


AWAD 


013210 


2526 


2528* 


AWAE 


013214 


2525 


2530* 


AWAS 


016074 


1322 


3042* 


AXA 


007750 


1806 


1810* 


AXAA 


013246 


2539 


2548* 


AXAB 


013274 


2546 


2554* 


AXAC 


013276 


2553 


2555* 


AXB 


007764 


1811 


1814* 


AX1A 


013326 


2563 


2571* 


AX1B 


013356 


2570 


2578* 


AX1C 


013360 


2577 


2579* 


AYA 


007776 


1821 


1825* 


AYAA 


013410 


2587 


2595* 


AYAB 


013434 


2599* 


2603 


AYAC 


013444 


2593 


2601* 


AYB 


010012 


1826 


1829* 


AZA 


010024 


1836 


184C^ 


AZAA 


013472 


2610 


2618* 


AZAB 


013530 


2616 


2625* 


AZAC 


013532 


2624 


2626* 



.MAIN. MACYII 30A(1052) 30-MAR-78 08:52 PAGE 67 

CZDLAG.P11 30-MAR-78 08:51 CROSS REFERENCE TABLE — USER SYMBOLS 



SEQ 0083 



AZB 


010040 


1841 


1844* 
























BDCNV 


004604 


1 181# 


1252 
























BDCNVA 


004636 


1188# 


1191 
























BDCNVB 


004670 


1193* 


1195* 
























BDCNVC 


004672 


1184* 


1196* 
























BDCNVD 


004674 


1185* 


1192 


1197* 






















BITO = 


000001 


449# 
1586 


718 
2823 


723 


739 


1091 


1098 


1294 


1451 


1573 


1577 


1578 


1582 


1583 


B1T1 s 


000002 


448(y 
1948 


1219 
1954 


1668 
2115 


1669 
2139 


1670 


1674 


1675 


1877 


1883 


1900 


1907 


1921 


1942 


BIT10 = 


002000 


439# 


811 


1810 


2025 


2031 


2037 
















BIT11 = 


004000 


438* 


806 


1825 


2307 


2316 


















BIT12 = 


010000 


437# 


1076 


1270 


1291 


1879 


1885 
















BIT13 . 


020000 


436# 


1250 


1345 


1458 


1944 


1950 


1956 














BIT14 = 


040000 


435# 


796 


1840 


1975 


1980 


2409 


2417 


2427 












BIT15 a 


100000 


433 
2059 


434* 
2065 


814 
2071 


1350 
2423 


1855 


1903 


1912 


1916 


1926 


1996 


2002 


2008 


2055 


BIT2 = 


000004 


447» 


831 


1220 


1599 


1603 


1604 


1608 


1609 


1612 


1689 


1693 


1694 


1698 






1699 


1702 


1971 


1973 


1978 


1994 


2000 


2006 


2259 


2283 


2304 


2431 


2822 






2834 


2883 


2927 






















BIT3 ^ 


000010 


446# 
2069 


1715 


1719 


1720 


1724 


1725 


1728 


2023 


2029 


2035 


2051 


2053 


2063 


BIT4 « 


000020 


445# 


























BITS = 


000040 


AAAM 


1742 


1746 


1747 


1751 


1752 


1755 


2579 












BIT6 = 


000100 


443(1' 


1099 


1100 


1105 


1452 


1453 


1464 


1626 


1630 


1631 


1635 


1636 


1639 






1769 


1773 


1774 


1778 


1779 


1782 


2450 


2452 


2455 


2457 


2474 


2475 


2477 






2495 


2498 


2503 


2518 


2520 


2523 


2548 


2550 


2555 


2595 


2597 


2599 


2618 






2621 


2626 


2642 


2643 


2646 


2687 


2689 


2694 












BIT? = 


000200 


442# 


1795 


2088 


2091 


2162 


2922 
















BITS = 


000400 


441# 


























BIT9 s 


001000 


440^ 


778 


816 


1430 




















BMOVA 


004572 


1174(S^ 


1 176 
























BMOVE 


004562 


1117 


117C.* 


1194 






















CD 


100000 


478# 


1497 


1513 


1531 


1547 


1563 


1590 


1616 


1643 


1759 


1816 


1831 


1846 






2076 


2142 


2168 


2273 


2293 


2397 


2437 


2461 


2483 


2506 


2534 


2582 


2605 






2629 


2657 


2674 


2697 


2811 


















CDINIT 


002706 


829# 


2303 


2706 


2821 




















CDINX 


002732 


830 


835* 
























CHAINN 


002540 


619 


796* 
























CHALT = 


104005 


465# 


























CHNA 


002556 


797 


800* 
























CHNAA 


002624 


807 


810* 
























CHNAB 


002550 


798# 


809 


825 






















CHNB 


002650 


785 


812 


816* 






















CLRCD 


003300 


706 


928* 


1081 






















CMASO 


001302 


536# 


1418 
























CMASI 


001304 


537* 


























CMAS10 


001322 


544* 


























CMASI 1 


001324 


545* 


























CMAS12 


001326 


546* 


























CMASI 3 


001330 


547* 


























CMAS14 


001332 


548* 


























CMAS15 


001334 


549* 


























CMASI 6 


001336 


550* 


























CMAS17 


001340 


551* 


























CMAS2 


001306 


538* 
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SEO 0067 



CMAS20 


001342 


552* 










CMAS21 


001344 


553* 










CMAS22 


001346 


554* 










CMAS23 


001350 


555* 










CMAS24 


001352 


556* 










CMAS25 


001354 


557* 










CMAS26 


001356 


558* 










CMAS27 


001360 


559* 










CMAS3 


001310 


539* 










CMAS30 


001362 


560* 










CMAS31 


001364 


561* 










CMAS32 


001366 


562* 










CMAS33 


001370 


563* 










CMAS34 


001372 


564* 










CMAS35 


001374 


565* 










CMAS36 


001376 


566* 










CMAS37 


001400 


567* 










CMAS4 


001312 


540* 










CMAS5 


001314 


541* 










CMAS6 


001316 


542* 










CMAS7 


001320 


543* 










CMPT 


014424 


2222 


2379 


2840* 






CMPTNG 


014514 


2841 


2843 


2845 


2847 


2849 2851 


CMPTOK 


014520 


2853 


2855* 








CNVCTR 


004742 


1187* 


1190* 


1209* 






CONT 


005322 


1285 


1291* 








COUNT 


001624 


646* 


991* 


1007* 


1008 




CRBUF 


001556 


627* 


1230* 


1318 


1321 


2730* 2933* 


CRBUFA 


001560 


628* 


1225* 


1311* 


1318 


1325 2725* 


CRBUFB 


001562 


629* 


1315* 


1316 


1329 




CTRO 


001564 


630* 


1221* 


1232* 


2186* 


2343* 2721* 


CTR1 


001566 


631* 


2191* 


2348* 


2840 


2842 


CTR2 


001570 


632* 


2196* 


2353* 


2842 


2844 


CTR3 


001572 


633* 


2201* 


2358* 


2844 


2846 


CTR4 


001574 


634* 


2206* 


2363* 


2846 


2848 


CTR5 


001576 


635* 


221 1* 


2368* 


2848 


2850 


CTR6 


001600 


636* 


2216* 


2373* 


2850 


2852 


CTR7 


001502 


637* 


2221* 


2378* 


2852 




CURTST 


001454 


593* 


784 


790 


843* 




DATAA 


005012 


1222* 


1233 








DATCHKa 


104004 


464* 


1231 


2731 


2934 




DATTST 


004770 


1219* 


2707 








DECVAL 


004762 


1182 


1217* 








DELAY = 


104016 


474* 


832 


1048 


2261 


2433 2574 


DIGIT 


004744 


1200* 


1203* 


1206* 


1207 


1210* 


DLCNT 


003772 


1027* 


1029 


1040* 






DLY 


003726 


623 


1027* 








DLYA 


003750 


1032* 


1037 








DLYB 


003754 


1033* 


1034 








DLYC 


003766 


1030 


1038* 








DOTHIS 


006216 


1430* 


2178 


2335 






DTCHK 


005424 


613 


1315* 








DTCHKA 


005514 


1319 


1334* 








DTCHKX 


005452 


1317 


1320* 








DTERR 


017253 


1017 


3162* 








ECDAT 


003606 


996* 


997 









2907* 2918* 
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i^ 



EHALT = 


104010 


EHLT 


005362 


EHLTA 


005372 


EMTA 


003000 


EMTINT 


002766 


EMTTAB 


001514 


EMO 


015226 


ERDAT 


016051 


ERR 


005516 


ERRA 


005566 


ERRB 


005666 


ERRC 


005672 


ERRD 


005702 


ERRE 


005704 


ERROR = 


104003 



ERR0R1= 


104015 


ERR1 


005540 


ERTP 


005706 


ERTPA 


005756 


ERXTIM 


015570 


ETXTIM 


015526 


EXA 


014174 


EXAA 


014244 


EXBA 


014300 


EXTA 


0141 10 


FMAP 


001472 


FNONE 


001630 


FORMAD 


006072 


FORWD 


002734 


FOUNDV 


001612 


FROMPC 


001634 


FTITLE 


001626 


GETRDY 


002402 


GOBACK 


006232 


GRCNT 


004020 


GTBIN 


004360 


GTBINP 


004426 


GTRDA1 


002472 


GTRDYA 


002442 


GTRDYC 


002500 


GTRDYD 


002522 


GTRDYX 


002410 


ICTR 


001464 


INBIN 


004322 


INCRPG 


0051 10 


INCRTN 


005100 


INDAT 


003562 


INTER 


017256 


KSTART 


001452 



468# 


1367 
























617 


1302# 
























1303 


1305# 
























849* 


























414 


846# 
























609# 


851 
























1364 


296 1# 
























1333 


3038# 
























612 


1337# 
























1340 


1345# 
























1337* 


1338* 


1341* 


1342* 


1343* 


1365# 
















1346 


1367# 
























1347* 


1348* 


1352 


1370* 




















1339* 


1344* 


1368 


1371# 




















463# 


1442 


1462 


1510 


1528 


1544 


1560 


1575 


1580 


1585 


1601 


1606 


1611 


1628 


1633 


1638 


1655 


1672 


1677 


1691 


1696 


1701 


1717 


1722 


1727 


1744 


1749 


1754 


1771 


1776 


1781 


1797 


1812 


1827 


1842 


1857 


1881 


1887 


1905 


1914 


1919 


1928 


1946 


1952 


1958 


1977 


1982 


1998 


2004 


2010 


2027 


2033 


2039 


2057 


2061 


2067 


2073 


2120 


2123 


2154 


2158 


2161 


2164 


2265 


2270 


2286 


2290 


2314 


2318 


2411 


2415 


2420 


2425 


2429 


2454 


2480 


2500 


2522 


2531 


2552 


2576 


2602 


2623 


2645 


2654 


2670 


2691 


2723 


2729 


2758 


2776 


2826 


2829 


2837 


2926 


2932 


















A73ff 


1332 


2100 


2137 


2224 


2381 
















622 


1341# 
























402 


404 


406 


408 


416 


735 


771 


1374# 












1382* 


1401 
























2382 


3006# 
























2225 


3000# 
























2766 


2771# 
























2787 


2790# 
























2802 


2805* 
























2741 


2747# 
























600# 


705* 


773* 


1098* 


1400 


1405* 


1451* 














648# 


713* 


733* 


736 




















745 


1096 


1298 


1409* 




















777 


838/^ 
























641)^ 


704* 


1078* 


1249* 


1446 


1466* 
















650^ 


1381* 


1387 


1398* 




















647# 


664* 


708 


712* 


755* 


















770# 


794 


817 


821 


1494 


















1431 


1433# 
























1053# 


1055 
























1130(y 


























1139# 


1224 


2724 


2917 




















781 


784# 
























777# 


783 


792 






















779 


786^ 
























789 


791# 
























771# 


819 


1432 






















597# 


808* 


841* 






















1 1 16# 


2720 


2916 






















606 


607 


608 


1245<y 


1479 


1480 


1481 














793 


124^ 
























990# 


1019 
























1461 


3163# 
























592)5» 


770 


1486* 
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SEQ 0069 



LDLINE 


016657 


LINA 


004214 


LINB 


004222 


LINENO 


001614 


LINSEL 


0041 14 


LINSLX 


004132 


LOGIC 


005312 


MACHER 


000004 


MANUALS 


100000 


MAPA 


002132 


MAPEND 


002220 


MAPERR 


002304 


MAPNE 


002160 


MAPOK 


002170 


MAPVEC 


006014 


MASKIT 


005374 


MDEVAD 


015135 


MESS1 


001762 


MFROM 


017177 


MNOLIN 


017210 


MNONE 


015211 


MOUTIN 


014764 


MPWRF 


017374 


MRXNUM 


015257 


MS ETC 


017012 


MSETRX 


016736 


MSETTX 


016764 


MSO 


017274 


MSI 


017304 


MS2 


017314 


MSB 


017324 


MS4 


017334 


MSB 


017344 


MS6 


017354 


MS7 


017364 


MTERR 


017100 


MTIT 


015044 


MTO 


017145 


NOP = 


000240 


NXTST 


001462 


OACNV 


004474 


OACNVA 


004510 


OACNVX 


004560 


OLDPS 


001470 


OPEN = 


000000 



OVRLAY 

OVRLYA 

OVRLYB 

PASCNT 

PFAIL 

PGMSG 



003516 
003532 
003552 
001635 
006234 
01515S 



1083 

1093* 

1092 

642# 

1076* 

1077 

421 

404A' 

433# 

716# 

717 

737 

714 

722 

410 

1226 

729 

672 

1388 

1094 

751 

2908 

1441 

1357 

2181 

2337 

2180 

2182 

2188 

2193 

2198 

2203 

2208 

2213 

2218 

1391 

711 

1384 

431# 

596* 

727 

1386 

1155* 

1151* 

599* 

432* 

631 

882 

1125 

2888 

707 

978* 

982 

651* 

412 

762 



3115* 

1104 

1096* 

741* 
1493 
1080* 
1237* 

714* 

725 

735* 

750* 

723* 

726* 

1396* 

1308* 

732 

674* 

3154* 

3156* 

2958* 

2919 

3182* 

2967* 

2338 

3124* 

3128* 

2339 

2345 

2350 

2355 

2360 

2365 

2370 

2375 

3141* 

2939* 

3148* 

770* 

1107 

2092 

1164 

1155 

1374* 

591 

632 

883 

1126 

975* 
983 
984* 
758* 
703 
2953# 



742* 
1095 
735* 
734 



2726 
2950* 



3166* 
3168* 
3170* 
3172* 
3174* 
3176* 
3178* 
3180* 



791 
1150* 
2096 

1159* 
1376* 
592 
633 
890 
1127 

1080 



1253 
1435* 



743* 1087* 
2862 2878 
771* 772* 



1108 
2902 
1506* 



1257 
2915 
1522* 



1282* 1297* 



818 838 
1256 1260 
2129 2133 



P40* 
1264 



1160* 1161* 1162* 1167* 



1377* 



1378* 1379* 



593 594 

634 635 

899 961 

1167 1209 



596 


597 


598 


614 


627 


628 


636 


637 


638 


639 


640 


643 


971 


1040 


1049 


1058 


1059 


1122 


1210 


1211 


1365 


1370 


1371 


2245 



629 630 

867 868 

1123 1124 

2395 2871 



1448 



1272* 
1437 



2447 
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SEQ 0076 



PIND 


004352 


1125# 


1141* 






















POPSP a 


005726 


450# 


1035 


1038 




















P0PSP2" 


022626 


451# 
2578 


724 
2601 


810 
2625 


1397 
2653 


1509 
2693 


1527 


1543 


1559 


2458 


2478 


2502 


3530 25S4 


PRGEA 


005250 


1277(5^ 


1292 






















PRGEB 


005334 


1280 


1294* 






















PRGEC 


005242 


1276# 


1295 






















PRGEND 


005122 


820 


1249* 






















PRGEXT 


005212 


1251 


1270* 






















PRGNUM 


001450 


591# 


766* 


1470 




















PRGTAB 


001474 


601# 


768 






















PRGXTL 


005302 


754 


1273 


1284# 




















PRGXT1 


005230 


1271 


1274* 






















PRGO 


006446 


601 


1486* 






















PRGOA 


006500 


1474 


1494* 






















PRGOB 


006474 


1488 


1493* 






















PRG1 


014522 


602 


2860* 






















PRG1A 


014546 


1475 


2867* 


2872 




















PRG1B 


014570 


2867* 


2871* 






















PRG2 


014574 


603 


2876* 






















PRG2A 


014620 


1476 


2883* 


2895 




















PRG2B 


014650 


2884* 


2888* 






















PRG3 


014672 


604 


2900* 






















PRG3A 


014716 


1477 


2907* 


2909 




















PRG4 


014732 


605 


2913* 






















PRG4A 


014746 


1478 


2917* 


2920 




















PRTYO = 


000000 


A59ff 
























PRTY1 = 


000040 


458* 
























PRTY2 = 


000100 


457# 
























PRTY3 = 


000140 


456* 
























PRTY4 = 


000200 


455# 


588 


590 




















PRTY5 = 


000240 


454* 
























PRTY6 = 


000300 


453# 
























PRTY7 3 


000340 


41 1 


413 


415 


452* 


1106 


1375 


1465 


1625 


1741 


1768 


2085 


21 14 


PSW = 


1 77776 


429* 


719* 


759* 


776* 


1031* 


1097* 


1106* 


1374 


1375* 


1450* 


1465* 


1625* 1741' 






1768* 


2085* 


2114* 


2451* 


2473* 


2496* 


2497* 


2519* 


2549* 


2572* 


2596* 


2619* 2620' 






2688* 
























PTO 


004346 


1123* 


1130 


1136* 




















PTOP 


004354 


1126* 


1139 


1145* 




















PT1 


00435C 


1 124* 


1130* 


1131* 


1134* 


1135* 


1136 


1137 












PTIP 


004356 


1127* 


1139* 


1140* 


1143* 


1144* 


1145 


1146 












PWRUP 


006244 


1435 


1437* 






















POTIT 


015270 


1490 


2969* 






















PITIT 


015632 


2861 


3012* 






















P2TIT 


015672 


2877 


3018* 






















P3TIT 


016475 


2901 


3094* 






















P4TIT 


016545 


2914 


3101* 






















RCMSK 


004040 


1054 


1058* 






















RDDAT 


003570 


992* 


d93 


1015 




















RDOCT 


003554 


763 


987* 


1084 


2865 


2881 


2905 














RESTAR 


006414 


487 


1443 


1470* 




















RETRN 


003712 


1000 


1020/. 






















RIND 


004344 


1116* 


1118 


1119 


1122* 


1132* 
















RMASK 


001404 


570* 


1308* 


1309* 


1310* 


1311 
















RNCNT 


004042 


1056* 


1059* 






















RNGEN 


003226 


911* 


1044 


1053 





















) 
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RP1 


003274 


RP2 


003276 


RREAD 


003702 


RSTART 


006426 


RSTPC 


003114 


RSTPSW 


003116 


RSTREG= 


104014 


RSTRG 


003060 


RTNNO 


001456 


RXBUF 


001412 


RXBUFT 


001610 


RXCRO 


001200 


RXCR1 


001202 


RXCR10 


001220 


RXCR1 1 


001222 


RXCR12 


001224 


RXCR13 


001226 


RXCR14 


001230 


RXCR15 


001232 


RXCR16 


001234 


RXCR17 


001236 


RXCR2 


001204 


RXCR20 


001240 


RXCR21 


001242 


RXCR22 


001244 


RXCR23 


001246 


RXCR24 


001250 


RXCR25 


001252 


RXCR26 


001254 


RXCR27 


001256 


RXCR3 


001206 


RXCR30 


001260 


RXCR31 


001262 


RXCR32 


001264 


RXCR33 


001266 


RXCR34 


001270 


RXCR35 


001272 


RXCR36 


001274 


RXCR4 


001210 


RXCR5 


001212 


RXCR6 


001214 


RXCR7 


001216 


RXCSR 


001410 



RXCSRT 001606 
RXEND 001300 
RXLVL 001422 



911 


915* 


922 


924* 




















914 


918 


921* 


925* 




















1002 


1004 


1006 


1009 


1016* 


















1472 


1474* 
























872* 


880 


882* 






















873* 


879 


883* 






















472* 


1165 


1177 


1198 




















621 


872* 
























594* 


760* 


782 


788 


813 


839* 


1349 


1360 












574* 


834 


931* 


1230 


1315 


1411* 


1525 


2287 


2319 


2388 


2408 


2417 


2423 


2427 


2671 


2730 


2827 


2889 


2928 


2933 














640* 


2408* 


2409 


2413 




















495* 


715 


738 


742 


1090 


1278 
















496* 


























503* 


























504* 


























505* 


























506* 


























507* 


























508* 


























509* 


























510* 


























497* 


























511* 


























512* 


























513* 


























514* 


























515* 


























516* 


























517* 


























518* 


























498* 


























519* 


























520* 


























521* 


























522* 


























523* 


























524* 


























525* 


























499* 


























500* 


























501* 


























502* 
573* 


930* 


1062 


1219* 


1228 


1261 


1356 


1409* 


1507* 


1668* 


1669* 


1670 


1674* 


1675 


1689 


1693* 


1694 


1698* 


1699 


1702* 


1715 


1719* 


1720 


1724* 


1725 


1728* 


1742 


1746* 


1747 


1751* 


1752 


1755* 


1769 


1773* 


1774 


1778* 


1779 


1782* 


1795 


1810 


1825 


1840 


1855 


1877* 


1879 


1883* 


1885 


1900* 


1902 


1903 


1907* 


1911 


1916 


1921* 


1925 


1942* 


1944 


1948* 


1950 


1954* 


1956 


1971* 


1973* 


1975 


1978* 


1980 


1994* 


1996 


2000* 


2002 


2006* 


2008 


2023* 


2025 


2029* 


2031 


2035* 


2037 


2051 • 


2053* 


2055 


2059 


2063* 


2065 


2069* 


2071 


2115* 


2116* 


2125 


2139* 


2263 


2268 


2288 


2307 


2310 


2316 


2392 


2548* 


2550* 


2555* 


2571* 


2573* 


2579* 


2595* 


2597* 


2599* 


2618* 


2621* 


2626* 


2642* 


2643* 


2646* 


2667 


2668 


2687* 


2689* 


2694* 


2748* 


275< 


2773* 


2774 


2792* 


2793 
















639* 


1902* 


1911* 


1912 


1925* 


1926 


2125* 


2126 


2134 


2667* 








527* 


716 


748 






















578* 


891 


934* 


1424* 


2596 


2619 

















liliiii 

mmmmmm 

liliiii- 



.MAIN. 


MACY11 30A(1052) 


30-MAR 


-78 08 


:52 PAGE 


73 


















SEQ 0< 


CZDLAG. 


P11 30-MAR-78 


08;51 




CROSS REFERENCE 


TABLE — 


USER 1 


SYMBOLS 














RXVTR 


001420 


577# 


889 


932* 


1103 


1265 


1404* 


1449* 


1456 


2648* 










SAVREGs 


104013 


471# 


1150 


1170 


1181 




















SAVRG 


003020 


620 


857* 
























SCOPE = 


104012 


470* 


1235 


1508 


1526 


1542 


1558 


1588 


1614 


1641 


1657 


1678 


1704 


1730 






1757 


1784 


1799 


1814 


1829 


1844 


1859 


1888 


1930 


1959 


1983 


2011 


2040 






2074 


2102 


2140 


2166 


2226 


2271 


2291 


2320 


2383 


2412 


2416 


2421 


2426 






2430 


2456 


2478 


2504 


2524 


2556 


2580 


2600 


2627 


2647 


2672 


2695 


2708 






2734 


2759 


2780 


2795 


2810 


2831 
















SCOPTR 


001466 


598# 


798 


842* 






















SELCAD 


015727 


2864 


2880 


3023* 






















SELCAR 


016620 


2904 


3109* 
























SELINE 


016716 


1109 


312U 
























SETSR 


005070 


1237* 


1492 
























SIOT 


004112 


1062* 


1064* 


1068 


1073* 




















SOFTSR 


000176 


483* 


659 
























SPBOT s 


001176 


430# 


652 


702 


774 


1439 


















SRESETa 


104011 


1843 


775 
1858 


1587 
2087 


1613 
2124 


1640 
2165 


1656 
2267 


1703 
2830 


1729 


1756 


1783 


1798 


1813 


1B28 


SRPTR 


000174 


482* 
1302 


656 
1345 


659* 
1430 


778 
1458 


786 
2922 


796 


806 


811 


816 


1076 


1250 


1270 


1S91 


SRSETT 


003210 


618 


904* 


906* 






















STAL 


003774 


611 


1044* 
























STALA 


004014 


1047* 


1049* 
























STALB 


004016 


1046 


1050* 
























STALL = 


104002 


462* 


2924 
























START 


002044 


673 


686 


702* 


757 


1248 


1393 
















STARTZ 


001640 


485 


652* 
























START1 


002234 


709 


738* 
























START2 


002240 


739* 


749 
























START3 


002274 


740 


747* 
























START4 


002334 


746 


758* 
























STLMSK 


001406 


571* 


1045 
























STLSPV 


003154 


616 


895." 
























STLSRV 


003120 


615 


886* 
























STPPA 


003176 


896* 


899* 
























STPRA 


003142 


887* 


890* 
























STRXD 


014404 


2547 


2594 


2617 


2639 


2666 


2685 


2686 


2772 


2834# 










STRXV a 


104006 


466* 


2545 


2569 


2592 


2615 


2640 


2683 














STTXV = 


104007 


467* 


2448 


2471 


2493 


2516 


















SUBTEN 


004702 


1189 


1200* 
























SUBTNA 


004706 


1201* 


1204 
























SUBTNB 


004722 


1202 


1205* 
























SVRPC 


003054 


857* 


865 


867* 






















SVRPSW 


003056 


858* 


864 


868* 






















TEMP 


001616 


643* 


1085* 


1086* 


1087 


1088* 


1089 


1274* 


1275* 


1276* 


1277 


1283* 


1296* 


1297 






1416* 


1417* 


1418* 


1419 


2091* 


2093 


2128* 


2130 


2306* 


2309* 


2312 






TEMPI 


001620 


644* 


726* 


728 


1419* 


1420 


1421* 


1422* 


1423* 


1424 


1425 








TEMP2 


001622 


645* 


2866* 


2867 


2868 


2882* 


2884 


2885 


2906* 


2907 










TENPWR 


004746 


1188* 


1201 


1205 


1211* 




















TIME 


011762 


1878 


1884 


1901 


1910 


1924 


1943 


1949 


1955 


1972 


1974 


1979 


1995 


2001 






2007 


2024 


2030 


2036 


2052 


2054 


2064 


2070 


2235 


2241* 


2390 






TIMER 


004110 


1065* 


1066* 


1072* 






















TIMERX« 


104017 


475* 


2122 


2285 


2728 


2825 


2836 


2931 














TIMETX- 


104020 


476* 


2119 


2153 


2160 


2722 


2925 
















TIMEX 


004106 


1067 


1071* 
























TIME1 


004062 


1063 


1065* 

























.MAIN. MACY11 30A(1052) 30-MAR-78 08:52 PAGE 74 

CZDLAG. P11 30-MAR-7a 08:51 CROSS REFERENCE TABLE 



— USER SYMBOLS 



SEQ 0073 



TIME2 


004066 


1066* 


1069 
























TIM1 


011766 


2242* 


2243 
























TKB 


001432 


584* 


994 
























TKLVL 


001442 


588* 


























TKS 


001430 


583* 


992 
























TKVTR 


001440 


587* 


























TMRX 


004044 


624 


1062* 
























TMTX 


004054 


625 


1064* 
























TNNO 


001460 


595* 


1349* 


1350* 






















TOPC 


001632 


649* 


1380* 


1383 


1396* 


1399* 


1402 


1403* 


1404 












TPB 


001436 


586* 


952* 


998* 






















TPLVL 


001446 


590* 


























TPS 


001434 


585* 


953 


996 






















TPVTR 


001444 


589* 


























TSTVA 


006372 


1457 


1464* 
























TSTVEC 


006270 


886 


895 


1446* 


1459 


1463 


















TSTVEX 


006412 


1447 


1467* 
























TXBUF 


001416 


576* 


928* 


1227* 


1415* 


1557 


2118* 


2121* 


2152* 


2155* 


2231* 


2234* 


2260* 


2284* 






2305* 


2389* 


2432* 


2727* 


2752* 


2824* 


2835* 


2868* 


2885* 


2929* 








TXCSR 


001414 


575* 


831* 


929* 


1064 


1099* 


1100* 


1105* 


1220* 


1222 


1413* 


1452* 


1453* 


1464* 






1541 


1573 


1577* 


1578 


1582* 


11.3 


1586* 


1599 


1603* 


1604 


1608* 


1609 


1612* 






1626 


1630* 


1631 


1635* 


1636 


1639* 


1653 


2086* 


2088 


2090 


2117* 


2156 


2162 






2229 


2232 


2237 


2259* 


2283* 


2304* 


2386 


2431* 


2450* 


2452* 


2455* 


2457* 


2474* 






2475* 


2477* 


2495* 


2498* 


2503* 


2518* 


2520* 


2523* 


2807* 


2808 


2822* 


2823* 


2834* 






2869 


2883* 


2886 


2927* 




















TXCSRT 


001604 


638* 


2090* 


2097 






















TXLVL 


001426 


580* 


900 


935* 


1425* 


2473 


2496 
















TXVTR 


001424 


579* 


898 


933* 


1402* 


2525* 


















TYP 


003342 


609 


939* 
























TYPA 


003352 


942* 


951 


960 






















TYPC 


003370 


944 


946* 
























TYPO 


C03416 


950 


952* 


957 


959 




















TYPDAT 


003462 


942* 


943 


946 


948 


952 


956* 


958* 


961* 












TYPE = 


104000 


460* 


671 


710 


731 


750 


761 


970 


1016 


1082 


1093 


1111 


1237 


1241 






1245 


1268 


1390 


1440 


1460 


1489 


2187 


2192 


2197 


2202 


2207 


2212 


2217 






2344 


2349 


2354 


2359 


2364 


2369 


2374 


2860 


2863 


2876 


2879 


2900 


2903 






2913 


























TYPES X 


104001 


461* 


1363 


2179 


2336 




















TYPF 


003434 


947 


956* 
























TYPG 


003446 


949 


958* 
























TYPS 


003464 


610 


964* 


972 






















TYPSA 


003510 


968 


970* 
























TYPSB 


003512 


966* 


967 


971* 






















UMASK 


001402 


569* 


780 


829 


1308 


1420* 


















X a 


000063 


1495* 


1497 


1503* 


1513 


1519* 


1531 


1537* 


1547 


1553* 


1563 


1569* 


1590 


1596* 






1616 


1622* 


1643 


1649* 


1659 


1665* 


1680 


1686* 


1706 


1712* 


1732 


1738* 


1759 






1765* 


1786 


1792* 


1801 


1807* 


1816 


1822* 


1831 


1837* 


1846 


1852* 


1867 


1873* 






1890 


1896* 


1932 


1938* 


1961 


1967* 


1985 


1991* 


2013 


2019* 


2042 


2048* 


2076 






2082* 


2104 


2110* 


2142 


2148* 


2168 


2174* 


2247 


2253* 


2273 


2279* 


2293 


2299* 






2322 


2328* 


2397 


2403* 


2437 


2443* 


2461 


2467* 


2483 


2489* 


2506 


2512* 


2534 






2540* 


2558 


2564* 


2582 


2588* 


2605 


2611* 


2629 


2635* 


2657 


2663* 


2674 


2680* 






2697 


2703. 


2710 


2716* 


2736 


2742* 


2761 


2767* 


27B2 


2788* 


2797 


S803# 


2811 






2817* 


























XOR 


002676 


803 


823* 
























XORA 


002020 


666 


682* 
























XORADD 


001276 


526* 


669* 


684* 























.MAIN. MACY11 30A(1052) 30-MAR-78 08:52 PAGE 75 SEQ 0074 

C2DUG.P11 30-MAR-78 08:51 CROSS REFERENCE TABLE — USER SYMBOLS 

XORFLQ 002016 670« 680# 685« 800 1523 2790 2805 

a 017432 401 «* 418 420# 426 481 # Aa4» 486# 488<l> 679# 753 954 1133 1142 

1223 1229 1981 2163 2230 2233 2387 2410 2414 2419 3424 2428 3828 
2923 

. ABS. 017432 000 

ERRORS detected: 

CZDLAG,CZDLAG=C20LAG.P11 
run-time: 3 7 1 SECONDS 
RUN-TIME ratio: 49/13=3.6 
CORE USED: 11K (21 PAGES) 

DOCUMENT PAGES: 74 



) 



